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ВЕГЕАЗЕ МОТЕ 


RELEASE NOTE 


In order to keep it up to date, the Release Note is not bound in with the manual but is 
supplied both as a printed sheet and as file RELEASE.PRN on the Distribution disc 
(the disc version probably being in a condensed form). The Release Note contains 
details of the memory addresses used by BASIC together with information about any 
improvements and additions since the Manual was published. To display the Release 
Note on the screen, follow the instructions in Chapter 2 for loading BASIC but instead 
of typing “BASIC” in response to the “B>” prompt, type: 


TYPE RELEASE.PRN<RETURN> 
If you wish to print it as well as displaying it, select a printer option first, as described 


in Appendix D, and type <CTRL/P> (hold down the CTRL key while typing the letter 
P) prior to pressing <RETURN>. 


The text of this manual was produced 
with the aid of word-processing software оп а 
Research Machines 380Z computer, and transmitted to 
The Hazell Press of Wembley for photo-typesetting 
in Century Schoolbook and OCR-B. 
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CHAPTER 1 
INTRODUCTION 


This is a Reference Manual for Research Machines Extended BASIC, Versions 5 & 6, 
for both the network and stand-alone Computers. It is not a teaching manual and is not 
intended to teach you how to write good programs in the BASIC language. For this, 
one of the many text books on the market must be consulted. “Illustrating BASIC” by 
Donald Alcock, Cambridge University Press, 1977, is a concise, entertaining little 
book and may prove to be a good starting point. In addition “Computing Using 
BASIC" by Tonia Cope, Ellis Harwood, 81, is an excellent introduction to the use of 
BASIC on Research Machines computers. 


Although this manual contains many examples, these are intended only to clarify the 
items described in the text, and do not necessarily illustrate how they should be used in 
real programs. 


Information in this manual applies equally to Stand-alone disc systems and the 480Z 
when used as a network station except where otherwise stated. 


Differences Between Versions 5 and 6 of Extended B 


Versions of CP/M 


Both versions of BASIC described in this publication can be run on a stand-alone disc 
system running under the control of versions 1.4 or 2.2 of the CP/M operating system. 
Note, however, that the random-access file management facilities implemented in 
Extended BASIC Version 6 cannot be used when running under CP/M version 1.4. If 
you wish to use Random Access File facilities and do not have CP/M 2.2, then contact 
the sales office for details of upgrades. Both versions of BASIC can be used when 
running under CP/NOS on a network system. 


How to Use this Manual 


Chapter 2 is an introduction to BASIC for both network and stand-alone operation and 
is intended mainly for the new user. Its aim is to build up his or her confidence to the 
level that simple programs can be written, run, saved and reloaded from disc. In the 
course of this, some topics are covered that are of value to the more experienced user. 


1.1 


INTRODUCTION 


Chapters 3 to 18 form the main work of reference. The various commands and 
keywords are arranged roughly according to function, commands with similar 
functions being grouped within each chapter. 


Depending on your inclination, you may prefer to read through these chapters from 
end to end, or merely refer to them as needed, using the contents list, index, and Quick 
Reference Guide. 

The Quick Reference Guide is in Appendix A and is also provided as a Reference Card. 
Appendix B is a list of error messages, with a brief explanation of each. Appendix C 
lists the differences between Extended BASIC Versions 5 and 6 and previous 
versions. Appendix D gives instructions on setting up a printer. Appendix E is a 
listing of the colour lookup table used by various of the high resolution graphics 
routines, and Appendix Е describes “Езсаре Sequences” which provide means of 
controlling from within a program certain system parameters. 


Making a Working Disc 


Details of making working discs for network systems is given the Network Manager’s 
Guide. For stand-alone systems the distribution disc on which you receive BASIC 
from Research Machines should not be used routinely. The programs on it should be 
copied to a working disc and the distribution disc put away in a safe place. You may 
need it if your working disc becomes damaged or lost, or, if an upgrade becomes 
available, to return to Research Machines as proof of purchase to qualify for a reduced 
price for the upgrade. 


The procedure for making a copy of the disc is outlined in the User Guide. 


There may be several versions of BASIC on the distribution disc. To conserve space оп 
your working copy, especially on systems with 5-inch single-density discs where you 
will be supplied with two distribution discs, we suggest that you erase all but the 
version you need and that you rename that version as BASIC.COM. Refer to the 
Release Note for details of the various versions. 


The disc also contains a number of sample BASIC programs of varying complexity. 


A Note About the Keyboard 


The keyboard for your system is described in the User Guide. Some brief notes are 
included here to minimize any cross-referencing that maybe needed. However, from 
time to time the model of keyboard supplied with the 380Z or 480Z might change, so 
the User Guide should be consulted should the information given herein refer to a 
keyboard that differs from your own keyboard. 
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Beginners should note that the computer keyboard differs from that of a typewriter in 
that there are three sets of characters — the normal lower case letters, the capital 
letters, (obtained by holding down <SHIFT> while typing a letter), and the control 
characters, generated by holding down <CTRL> while pressing a letter or other 
character key. If you need to key in a quantity of text in upper case, a convenient way 
to do this without having to keep pressing <SHIFT> is to press «CAPS LOCK? once. 
This causes the letter keys to generate upper case characters whilst the other keys 
generate the unshifted characters. Thus the key marked A generates capital A whilst 
the key marked with numeral 1 and the exclamation mark generates 1 when pressed 
alone, or ! when pressed with <SHIFT> held down. Pressing <CAPS LOCK> again 
allows the letter keys to generate lower case characters. 


Some of the older Research Machines keyboards include two keys whose markings 
may prove confusing. <SHIFT/3> may be marked with a pound sign but in fact it 
generates the hash or sharp symbol (#), used in association with file handling. On some 
keyboards, <SHIFT/DELT> generates the rubout code and will delete one character, 
but in its non-shift mode it may appear to generate a hash while in fact generating an 
underscore. 


«RETURN? is used to signal the end of a line to the computer. <ESC> is used only 
within the EDIT command. Some keyboards have <ESC> marked <ALT MODE>, 
while on others <ALT MODE? actually generates this character. If you are unsure of 
your keyboard in this or any other respect, experiment. 


The other special keys may or may not be connected, depending on the model of the 
keyboard. <FF> is equivalent to <CTRL/L> and clears the screen while <SI> is 
equivalent to <CTRL/O> and suppresses output. <REPT> repeats the last key 
pressed. <ВВЕАК> is disabled and has no use, and «US», <LINE FEED>, and 
<FS> are ignored. 


The 480Z keyboard includes an additional set of special function keys on the right 
hand side of the keyboard. In BASIC these are mostly used for editing lines. The 
«CAPS І ОСК» key on Ше 4807 keyboard stays down when pressed and is released 
by pressing it again. 


A Note About the Display Screen 


Some 380Z and 480Z systems have the ability to display text in either 40 or 80 
character mode with the consequence that the number of characters per line on the 
screen can be changed. Where this difference may be significant is indicated within the 
text of the manual. Full details are given in the appropriate User Guide supplied with 
your system. 
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CHAPTER 2 
GETTING STARTED WITH BASIC 


This chapter is intended mainly for those meeting BASIC for the first time. It takes 
you on a short guided tour of some of the facilities of Research Machines Extended 
BASIC and is intended to be intelligible to those who have not yet learned the BASIC 
language. If you are sucha person, we suggest that you work through this chapter step 
by step at the computer. You will then need to turn to one of the textbooks on BASIC 
programming which were mentioned in the previous chapter, using the rest of this 
manual for reference. 


Those already familiar with BASIC but who have not yet used it on the 380Z or 4802; 
computer may find it helpful to scan through this chapter. It introduces many aspects 
of this particular dialect of BASIC. More details will be found in the later chapters. 


For a network station, details of loading BASIC are given in the Network Station 
User's Guide. For a Stand-alone Disc System, switch on the computer or press the 
RESET button if it is already on. Insert a CP/M system disc in drive А and a BASIC 
disc in drive B, making sure that the discs are the right way up — the user guide will 
tell you which way this is — and that the drive doors are properly closed. Press «B» to 
start the operating system: the computer will display: 


Research Machines 
Release 1.1M 
31K CPM vers 2.2 € 
A> 
or something very similar. Then select drive B. This is done by entering: 
B:<RETURN> 
in response to the “A>” prompt. Then enter the name of the BASIC interpreter 
followed by pressing <RETURN>. If you followed the advice in chapter 1, this will be 
BASIC; otherwise, check in the Release Note. When BASIC has been loaded in, it 


prints a message on the screen, such as: 


RML Extended BASIC V5.0 L 
Copyright (C) 1982 by Research Machines 


Ready: 
“Веаду:” means that BASIC is waiting for you to enter a BASIC program line or 


command. 
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A FIRST LOOK AT THE PRINT INSTRUCTION 


Enter: 
PRINT "HELLO"«RETURN» 

The computer will display word HELLO on the next line, like this: 
HELLO 
Ready: 


If you make a mistake, such as misspelling the word PRINT, the computer displays 
the error message: 


Syntax error 
Ready: 
If you miss out the quotation marks, the computer will display a zero: 
0 
Ready: 


Notice that you can tell the difference between a capital letter О and the number 0 on 
the screen by their shapes. 


What you have just entered into the computer is called a BASIC statement. PRINT is 
an instruction to the computer telling it to display on the screen the characters 
between the quotes. You can enter up to 128 characters before pressing «RETURN». 
If you try to enter more characters than this, the computer will ignore them. 


In the case of numbers, the number does not necessarily have to be enclosed in 
quotation marks. Enter the statement: 


PRINT '"99'«RETURN»? 


This instructs BASIC to print the number 99 on the next line, as expected. But if you 
enter: 


PRINT 99<RETURN> 

the computer again displays the number like this: 
99 
Ready: 


Despite the missing quotation marks, the value is correct and there is no error 
message. In fact, BASIC will let you use the PRINT command for most numbers 
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without enclosing them in quotation marks. Here are a few for you to try: 
3 —5 3.14159 1001 .303 +1.5 


As you can see, а number can have a decimal point and а plus ог minus sign. 


USING BASIC AS A CALCULATOR 


Without further study, the computer can be used as a simple desk calculator. Try 
entering: 


PRINT 3+4<RETURN> 


The answer, 7, appears on the next line. BASIC can perform five different elementary 
arithmetic operations: 


Addition Indicated by the usual plus sign (+). 


Subtraction | Using the minus sign (—). The minus key on most о 
is the one to the right of the number 0, shared with = 


Multiplication Here an asterisk (*) must be used; there is no cross symbol on 
the keyboard. Also, multiplication is never implied by leaving 
out the multiplication symbol — where in mathematics we can 
write “ах”, іп BASIC we must enter “А *Х”. To find 12 times 
9 enter: 

PRINT 12*9<RETURN> 
Division Using the slash sign (/). To divide 108 by 12, enter: 
PRINT 108/12<RETURN> 


Exponentiation It is often necessary to multiply a number by itself a given 
number of times. Instead of entering: 


PRINT 2*2*2*x2*2 «RETURN» 
you can enter: 
PRINT 2T5<RETURN> 
The upward pointing arrow is usually the key marked with a 


circumflex sign, to the right of the minus sign. 
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Notice that you can use a number of arithmetic operations on the same line. For 
example, you can enter: 


PRINT 1+2+3+4<RETURN> 
or 
PRINT 1-3+6<RETURN> 


The exact rules for combining operations will be given in Chapter 3 but you can try 
some experiments now if you wish. 


THE IMPORTANCE OF THE RETURN KEY 


So far you have been pressing <RETURN> after every line without much thought. It 
is worth realising why this key is used so much. The reason is simple: without 
<RETURN> the computer does not know when you have finished an instruction. 
Suppose you started entering: 


PRINT 5+6 


If the computer decided at this point that you had finished entering the statement and 
printed 11, it would not be very helpful if you had in fact planned to enter: 


PRINT 5+6+7+8 
which gives a completely different answer. Since the computer cannot tell when you 
have finished, you must tell it. You do this by pressing <RETURN>. You always have 


to do this after entering an instruction. Pressing «RETURN? key should be a habit 
by now, if you have been doing all the examples. 


CORRECTING KEYING MISTAKES 


No опе 15 a perfect typist. BASIC has two features that aid in correcting keying errors. 
The first is <DELT>; it acts rather like the backspace key on а typewriter and often 
saves you the effort of re-entering a whole line when you make a mistake. Suppose you 
have accidentally entered: 

PRINT GOOD MORNIG 
By pressing <DELT> twice you rub out the last two characters (G’’): 

PRINT GOOD MORNI 


and you may correct the message. 
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Each time you press <DELT> the cursor moves one place to the left and the character 
it rubs out is lost. 


The second special key is <CTRL/U> which is entered by holding down the key 
marked CTRL while pressing U. The 3802, computer responds with 70, and then 
begins a new line. The whole of the line you were entering before you entered 
<CTRL/U> is considered rubbed out. Thus, a second way of correcting the mistake in 
GOOD MORNING is: 


PRINT "GOOD MORNIG''TU 
PRINT "GOOD МОКМТМЕ" <ВЕТУКМ> 
GOOD MORNING 


Ready: 


Sometimes you will find that it is quicker to delete a whole line with <CTRL/ U> and 
start again than to rub out most of it with «DELT». 


When «CTRL/U? is entered on the 480Z, the current line is deleted from the display 
screen and its cursor returns to the beginning of the line. Also on а 4807, pressing 
<SHIFT> key followed by the function key «F1» (on the righthand end of the 
keyboard) has the same effect. 


GETTING STARTED WITH GRAPHICS 


As well as characters, the computer can display dots. To use these, you need a way to 
describe what you want to display and where you want it. To specify where a dot goes, 
you divide the screen into columns. In 40-character mode, the screen is divided into 80 
columns numbered from 0 to 79. In 80-character mode there are 160 columns 
numbered from 0 to 159. Column 0 is at the left and the numbers increase to the right. 
To simplify this introduction, it is assumed that you have a 40-character screen. The 
screen is also divided into 72 rows, numbered —12 to 59, starting at the bottom and 
increasing upwards. 


Your screen is probably now full of the commands and responses you produced earlier. 
To clear it and make it ready for graph plotting, enter the instruction: 


GRAPH 


When you use this instruction, the upper twenty lines of the screen are cleared to 
create a “graphics area” leaving four lines for text at the bottom. 


To display a dot in the middle of the graphics area (column 40, row 30), you enter: 
PLOT 40,30,2 
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The digit 2 indicates to BASIC that you want to display a white dot. You can change it 
to a grey dot, enter: 


PLOT 40,30,1 

To rub out a dot at column 40, row 30, enter: 
PLOT 40,30,0 

To put a dot in the lower right corner, you must specify column 79, row 0: 
PLOT 79,0,2 


Notice that you specify the column first, as you do the X coordinate in graph plotting. 
Now try missing out the third number: 


PLOT 0,59 


The brightness you last specified (white) has been remembered; a white dot is plotted 
in the top left corner of the screen. 


You have probably noticed that the last few instructions that you have entered have 
moved up the screen for four lines and then disappeared. To put things back as they 
were before you entered the GRAPH instruction, enter the instruction: 


TEXT 


This instruction moves the lines you enter up to occupy the whole screen. 


A SIMPLE PROGRAM 


So far, the PRINT and PLOT commands have been acted on immediately, as soon as 
«RETURN? was pressed. This way of using BASIC is called direct mode or 
immediate mode. It is also possible to hold a series of commands in the computer’s 
memory and then execute them later. In this mode, the sequence of stored statements 
forms a BASIC program. The program can be executed once or many times, and can be 
later stored on a disc to be reloaded and executed at some time in the future. Clearly, 
program mode is far more useful than direct mode. 


To enter a number of lines of commands as part of a program, you must start each of 
them with a line number. To make sure the computer’s memory is cleared, enter: 


NEW<RETURN> 
and then enter the statement: 


ТО PRINT 99<RETURN> 
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This time nothing happens except that the cursor moves to the beginning of the next 
line; the number 99 is not printed on the screen. Now enter RUN (followed by 
<ВЕТОВМ>): 


RUN<RETURN> 
99 


Ready: 


The RUN command causes the program currently being “looked at" by BASIC to be 
executed. To see the program on the screen, use the LIST command: 


LIST<RETURN> 

10 PRINT 99 

Ready: 
NEW, RUN and LIST are called utility commands. They are described in Chapter 4. 
Now try a more ambitious program: 


10 LET X=0 
20 LET X=X+1 
30 PRINT X 
40 GOTO 20 


If you make a mistake while entering these lines, use <DELT> or <CTRL/U> as 
described previously. When you have entered in the four statements, use LIST to 
make sure they are all correct. If you have made a mistake in one of them, you need 
only re-enter the whole line. BASIC holds the most recent version of a line with a given 
line number. Notice that you did not need to enter NEW before keying in this example 
as line 10 of the previous example was automatically replaced with the new line 10. 


Having checked that the program is correct, enter RUN. The program should print a 
sequence of numbers, starting from 1, the numbers being the current values taken by 
the variable X. A variable is the term used to refer to a place in the computer memory 
where a number is stored. In BASIC, variables are given names of one or two letters; 
they are described in more detail in Chapters 3 and 6. 


When you run this program, it is probable that it will pause after displaying the 
number 22 with the cursor blinking on the bottom line. If not, press <CTRL/A>. 


CONTROLLING SCREEN OUTPUT 


_ We assume that you have run the previous example and that the cursor is blinking at 
the bottom of the screen. This demonstrates the auto-paging function of the computer. 
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After the LIST command has been used for a long program, output to the screen 
pauses as soon as the screen has been filled. To see the next lines in the program press 
the space bar. Try this a few times. 


Auto-paging is turned on and off by <CTRL/A>, which acts like a switch. Press 
<CTRL/A> once and observe that BASIC no longer pauses at the end of each page. 
Press <CTRL/A> again to resume auto-paging. 


There is another way of stopping output to the screen which is useful when you want to 
stop output at a specific point. Turn off auto-paging, then press <CTRL/S> to stop 
output. Note that pressing the space bar no longer causes output to resume; instead 
you must press <CTRL/Q>. <CTRL/S> and <CTRL/Q> do not alter the auto-paging 
switch. 


INTERRUPTING A PROGRAM 


It will probably be evident by now that if we did nothing, the example program would 
continue printing a series of increasing numbers for ever, or very nearly so. There is a 
need for a method of interrupting a running program without having to press the 
RESET button. Press <CTRL/Z> to achieve this. Try it, and observe that BASIC 
displays: 


Interrupted at line n 
Ready: 
where “п” is the number of the line that was about to be executed when <CTRL/Z> 
was pressed. The keyboard is checked for <CTRL/Z> at the beginning of every 
statement. This means that a BASIC program can be interrupted at any time. 
If necessary, an interrupted program can be resumed by entering: 
. CONT 


This continues execution from the point of interruption. Try this, and then interrupt 
the program again with <CTRL/Z>. 


PROGRAM MODIFICATION 


The program example is clearly rather unmanageable. We would rather it stopped 
after printing a defined number of values of X. To make sure that the program is 
interrupted, enter the additional statement: 

25 IF Х>15 THEN STOP 


Although we have not yet met the IF command, the meaning of this statement should 
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be fairly clear. This addition illustrates a number of points. 


Enter LIST and observe that although line 25 was the most recently typed, BASIC 
has inserted it in the correct place, between lines 20 and 30. 


Gaps of 10 were left in the original numbering of the program lines, just in case we 
needed to add an additional line. It is common practice to number BASIC statements 
in increments of 10. The numbering may be tidied up at any time by the RENUMBER 
command. See Chapter 4 for more details. 


We have now modified the program by adding an additional statement. It can no 
longer be continued by the CONT command. 


Try out the modified program and make sure that it stops after the number 15 has 
been displayed. 


USING A PRINTER 


You should skip this section if you do not have a printer attached to your computer. 


Once a program is working correctly, it is usually desirable to make a permanent 
record of it and of its output on a printer. If using BASIC ona stand-alone system it is 
first necessary to select a printer option. The computer supports various types of 
printer and the user must inform the computer which type is attached. If no printer 
option is selected, output intended for the printer is sent to the screen. 


A number of ways of selecting a printer option are available. Connecting and setting 
up a printer on a new system can be difficult, particularly if the printer was not 
purchased through Research Machines. Beginners are therefore advised to leave this 
until they are more familiar with the rest of the system. If the equipment is already 
operational, refer to chapter 4 and appendix D for setting printer options. 


Once a printer option has been selected, the LLIST command can be used. LLIST is 
similar to LIST but its output goes to the printer rather than the screen. Similarly, 
PRINT statements can be replaced by LPRINT, with similar effect. 


An alternative and often more convenient method is to press <CTRL/P>. After 
<CTRL/P>, all output to the screen is also sent to the printer, until <CTRL/P> is next 
entered. Thus, a program can be tested with its output sent to the screen and then run 
again without modification, merely by entering <CTRL/P> to produce a fair copy on 
the printer. <CTRL/E> is equivalent to <CTRL/P>. 


If you have a printer connected to your system, test these new commands on the 
modified program. 


If you are using a network system your output will be sent to a file on the network 
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Server, and printed only after you indicate that a suitable quantity has been produced. 
You do this by issuing the command CLOSE #2. See Network Users Guide for further 
details. 


SAVING AND LOADING PROGRAMS ON DISC 


Now that you have а working program, you may want to save it on disc so that it can be 
run on another occasion without the effort of keying it in again. The SAVE command 
is used. Assuming that you would like to call the program TESTI, enter: 


SAVE "TEST1"<RETURN> 
Ready: 


On a stand-alone disc system the light on one of the disc units will come on for a few 
seconds before " Веаду:" is displayed. On a network system the light on one of the disc 
units attached to the Network Server will come on for a few seconds before "Веаду:" is 
displayed. You can confirm that the program has been saved by using the DIR 
command: 


DIR<RETURN> 
B: TEST1 BAS 


Ready: 


The letter before the colon is the logical disc unit containing the disc on which the 
program has been saved. BAS is the extension of the filename (secondary filename) 
which is given automatically by BASIC if none is supplied. 


Saved programs are reloaded by the LOAD command. Before trying LOAD, delete the 
existing program from memory by using the NEW command and confirm that you 
have done so by using the LIST command. It is not necessary to do this as BASIC 
automatically deletes existing programs from memory before loading a program, but 
doing so at this stage will help to confirm that you can save and reload programs 
correctly. Having cleared memory, reload TEST1 by entering: 


LOAD "TEST1'"<RETURN> 
Ready: 
Again the disc unit light will come on and there will be a short pause before BASIC 


displays “Кеаду:”. You can now confirm that TEST1 has been reloaded by using the 
LIST or RUN commands. 
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ENDING A SESSION 


At the end of a BASIC session, after any new programs have been safely saved on disc, 
you will want to leave BASIC. In fact all you need do оп a stand-alone system is to take 
your discs out of the disc drives and turn the computer off. However, you may wish to 
return to the CP/M Operating System (CP/NOS for the network user) to use one of the 
other system programs. In this case you either enter <CTRL/C> or the BYE 
command. Because <CTRL/C> can be used accidentally, the warning message: 


TC--Are you sure (У/М): 


is displayed. Enter Y or y to leave BASIC or N to continue using BASIC. 


SOME COMMON PROBLEMS 


This section refers to stand-alone disc systems. Two problems can arise whilst saving 
programs in Extended BASIC, neither of which is dealt with ina particularly elegant 
manner at present. 


Onastand-alone disc system you may decide that you wish to save the current BASIC 
program on a different disc. You change the disc, then issue the SAVE command. 
Instead of saving the program, the system displays an error message such as: 


BDOS ERROR ON A: R/O 


If you press any key except <CTRL/F>, you might lose your program. Refer to the 
descriptions of the RESET and SAVE commands in Chapter 4 for the recovery 
procedure. Remember always to issue the RESET command after changing a disc. 


Alternatively, all is going well during a SAVE operation until a message such as: 
А 00 15 OA 5160 BDOS ERROR ON A: BAD SECTOR 


appears. This sort of message means that there is an unreadable sector on the disc. 
Probably the safest thing to do is to remove that disc for later investigation, replace it 
with another disc and enter <CTRL/F>, followed by J>103. This restarts BASIC at 
its recovery address. Your program should be intact. Now issue the RESET command 
(because you have changed discs) and try the SAVE command again. 


If problems arise when saving Extended BASIC programs on the network, refer to 
Appendix B, and if the error is not described there, refer to the Network Station Users 
Guide for details of system error messages. 
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CHAPTER 3 
ELEMENTS OF BASIC 


This chapter discusses some of the elements from which a BASIC program is 
constructed. Some knowledge of the BASIC language is assumed, so it is probably 
best to skim through this chapter on the first reading and then study it more carefully 
after reading some of the later chapters in this manual. 


FORMAT OF NUMBERS 


When a number is supplied to BASIC from the keyboard, either as a constant that 
forms part of a program or in response to an INPUT instruction, it may take a variety 
of forms. For example: 


3 —5 3.14159 1001 .303 +1.5 

As сап be seen, a number may consist of an integer part (before the decimal point) and а 
fractional part (after the decimal point), either of which may be omitted, and may be 
preceded by a plus or minus sign. If no sign is supplied, the number is assumed to be 
positive. 

BASIC displays or prints numbers in a similar form. If the number is positive, it is 
preceded by a space, and by a minus sign if it is negative. Numbers larger than 999999 
or smaller than 0.01 are printed in scientific (or exponential") notation. For example, 
the number 1234567 is printed: 

1.23457E+06 


This number should be read as ‘1.23457 times 10 to the power 6”. Similarly, the value 
0.0001 is printed: 


1E-04 
meaning “1.0 times 10 to the power minus 4”. 
Numbers may be input to BASIC in normal or scientific notation. In scientific 


notation, lower case “е” is also recognized as indicating an exponent. The change in 
format for large or small numbers applies only on output 


values allowed is approximately —1E38 to 1E38, with values whose magnitudes are 
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less than approximately 1Е— 38 being indistinguishable from zero. 


Checks are made for meaningless exponents in numerical constants. Very large 
positive exponents cause arithmetic overflow while large negative exponents generate 
zero. 


A number may also be supplied in hexadecimal, in which case it is preceded by an 
ampersand (&) and consists of a sequence of hexadecimal digits (0—9, A—F). For 
example: 


ФА 400  &FCOO 


The value of the constant must Пе within the range 0 to &F FFF. 


LITERAL STRINGS 


А “‘literal string” is a sequence of characters enclosed in quotation marks (7). The 
characters must not include a quotation mark but may include any other printable 
character. Ina DATA statement, the quotation marks are optional if the string does 
not contain commas, colons, or leading spaces. 


NUMERIC VARIABLES 


“Variable” is the term used to refer to a named entity whose value can change during 
execution of a program. A numeric variable holds a numeric value that may change 
during execution of a program. A variable name must begin with an alphabetic 
character (A to Z). This allows the computer to distinguish it from numeric constants 
(which always start with a number). After the first letter, the variable name may 
consist of any alphanumeric character (А to Z, 0 to 9). Examples of variable names аге: 


B ВЗ ZP X Y5 


To improve program readability, you can use variable names that are meaningful, 
such as: 


SUM | MEAN AVERAGE 


Only the first two characters are used to distinguish one variable name from another. 
Thus the names COUNT and COCOA refer to the same variable. 


CAUTION: variable names must not contain embedded BASIC instruction names. 
For example, the variable name LONG would give rise to a syntax error since it 
contains the BASIC instruction ON. Furthermore, since Extended BASIC Version 6 
supports more instructions than Version 5 (such as MIN, MAX, ТУР), it is possible 
that programs that run under Version 5 will fail under Version 6 unless certain 
variables are renamed. 
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STRING VARIABLES 


All the variable names described in the previous section are used to hold numeric 
values that are to be used in calculations. A variable may also hold a string of 
alphabetic, numeric, or special characters, such аз “HELLO” " 100,57”, or “25%”; 
these variables are called string variables. A string variable name has a dollar sign ($) 
appended. For example: 


А$ В9$ MESSAGES 


Note that the last example would be indistinguishable from МЕ$. A string variable 
may hold from 1 to 255 characters, or it may be empty. An empty string variable is said 
to contain the null string. It is not possible to use string variables in arithemitic 
operations to calculate new values. 


ARRAY VARIABLES 


The numeric and string variables described above are referred to as simple variables, 
since each can hold only one numeric value or one string of characters. A numeric or 
string array can hold a series of numeric values or strings. An array variable is a 
member of such an array and has the form of a simple variable name followed by a list 
of subscripts enclosed by parentheses. Each subscript is a number or an arithmetic 
expression that evaluates to a number in the range 0 to 65535. There can be any 
number of subscripts, up to a limit of 255. Smaller limits will in practice be imposed by 
the amount of available memory. Examples of array variables are: 


B(2) B3$(4) SUM(5,3) MESSAGE3$(10) 


If there is a single subscript, as in the first example, the array variable can be thought 
of as a member of a single row of simple variables. Thus B(2) is a member of the array 
B(0), B(1)...B(n). Similarly, array elements with more than one subscript form part of a 
matrix containing two or more rows of variables. 


The number of rows in an array and the number of elements in each should be 
established by a DIM statement before referring to one of its elements (see Chapter 6). 
Thus the statement: 


DIM B(20) 


. defines numeric array B to have one row containing 21 elements numbered 0 to 20. If 


an element of an array is referred to before the array has been defined by a DIM 
statement, BASIC creates it automatically with as many dimensions as there are 
subscripts and with eleven elements in each dimension (allowing subscripts in the 
range 0 to 10). 


3.3 


ELEMENTS OF BASIC 


If any subscript value exceeds the number of elements defined for its row, the error 
message: 


Subscript out of range 


results. A simple variable can have the same name as a subscripted variable without 
confusion (by the BASIC interpreter, at least). 


Note that a subscripted string variable represents an element of a string array, and is 
itself a complete string. A simple string must not be defined with a DIM statement to 
reserve storage for the characters in it, as is the case with many other BASICs. 


STORAGE REQUIREMENTS 


A simple numeric variable occupies six bytes of storage, the first two holding the name 
and the last four holding the internal representation of the number (see below). A 
string variable also occupies six bytes, again using two bytes for the name and four for 
the internal representation of the string. In addition to these six bytes, one byte of 
memory is required for each character in the string. These bytes may be located in the 
program itself, for example after statements such as: 


100 LET АЗЗ''НІ THERE" 
or in "string space’’, described below. 


A numeric array element occupies just the four bytes necessary to hold the internal 
representation of the number. The entire array occupies five bytes plus two bytes per 
dimension plus the four bytes per element. String arrays require the same amount of 
storage as numeric arrays, plus space to store the actual strings. 


String space is an area at the top of memory which is used for storing the characters 
held in strings. The size of string space is fixed by the CLEAR command (see Chapter 
6), or 100 bytes by default. Where possible, literal strings occurring within the 
program are used in place, to reduce storage requirements. When string space 
becomes exhausted, a ‘‘garbage collector' is used to recover the space released when 
strings are reassigned. This process can cause an observable delay of up to a few 
seconds or so. If there is still insufficient space the error message: 


No string space 


is produced. 
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USE OF MEMORY 


Extended BASIC Version 5 uses the first 13K bytes or so of memory for the 
interpreter itself and some workspace. The Extended BASIC Version 6 interpreter is 
about 20K long. Above this come in turn the program, the simple variables, and the 
arrays. Next is a gap (of a size determinable by the function FRE) which is unused. 
Above the empty space is the stack, which is used to store return addresses for 
GOSUB statements and information about FOR loops, etc. Above the stack is the 
string space, the area used for storing the characters held in strings. At the top of 
memory is “саске”, an area that BASIC does not use at all and that is set to a size of 
zero bytes when BASIC is started. Cache memory is intended for use with machine 
language routines, especially the routines GLOAD and GSAVE used in the High 
Resolution Graphics package. See also Chapter 13. 


ASSIGNMENT OF VALUES 


During the execution of a BASIC program, values can be stored in either numeric or 
string variables by means of the LET instruction. Examples are: 


LET A=2 
LET M$="'HALLO" 
LET B(5)=3.14159 


This process is referred to as assigning a value to a variable. Many different values 
may be assigned to a variable during the course of a program. The LET command is 
described in Chapter 6. 


Extended BASIC automatically assigns the value zero to numeric variables and a null 
string value to string variables on their first occurrence in a program. Thus, if variable 
C has not yet been used in a program, the statement: 


LET A=C 


assigns zero to A. However, it is a dangerous programming practice to assume that 
this will occur, for not all dialects of BASIC used on other computer systems work the 
same way. You are urged to assign values to all variables before using them. Note that 
a statement of the form: 


LET Мб="" 


assigns a null string to a string variable. 
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EXPRESSIONS 


In addition to consisting of a numeric or string constant, the right hand side of a LET 
statement, and indeed most other places where such a constant can occur, can consist 
of an expression. An expression is composed of operators and operands, which must 
alternate and end with an operand. An operand is either a constant, a variable, a 
function call, or an expression enclosed within parentheses. An operator is an 
arithmetic operator, a relational operator, a logical operator, or the string 
concatenation operator. 


Examples of arithmetic operators are 


LET А=В+2 addition 

LET C=D-5 subtraction 
LET P=5*1.5 multiplication 
LET Х=100/3 division 

LET Е=273 exponentiation 


Relational operators are usually used in conditional statements of the form: 
IF A>3 THEN PRINT "A GREATER THAN 3" 


The IF instruction and the available relational operators are described in chapter 8. 
Relational operators can be applied to either numeric or string operands, but the 
operands must be of the same type. The relationship between two strings is decided by 
the ASCII value of the first pair of differing characters starting from the left. Thus 
"APPLE" is considered to have an ASCII value that is less than that of “AXIOM”. 


The logical operators AND, OR, and NOT are normally used to decide the truth or 
otherwise of a series of relationships, such as in the statement: 


IF A>3 AND B=2 THEN ... 


where the AND operator combines the results of the two relational operators. 
However, the mechanism used is to combine the values of the operands, expressed as 
16-bit binary values, with a non-zero result being regarded as “true” and a zero result 
as "false". Thus you can write statements, such as: 


IF A AND 1 THEN PRINT "A IS ODD" 


The effect of the AND operator is to perform a logical AND operation on the 
corresponding bits of its operands, in this case A and 1. The result of this operation is 
either 0 or 1 depending on whether A is even or odd. 0 is false, and 1 is treated as true. 


Relational operators can be used as part of non-relational expressions. A true result is 
returned as —1, and false as zero. For example, the following statement adds one to the 
variable B if A is negative: 


LET BzB-(A«0) 
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The string concatenation operator is the plus sign (+). It is used to join one string to 
another. 


For example, the statement: 
PRINT "ROSE" + " " + "BUSH" 


joins three strings to print: 


ROSE BUSH 


The order of priority of the operators is: 


* String concatenation 
Exponentiation 

= Unary minus 
Multiplication Division 


> 


ў З ў 1 
< — Relations | | 
=", Logical МОТ 
Logical AND 
with the highest priority operators in an expression evaluated first. Operators of equal 
precedence are evaluated from left to right as given in an expression. 
| ^ 


These rules of operator priority may be modified when necessary by parentheses. 
Expressions in parentheses are evaluated first. Thus: 


LET A=3+4*5 


assigns 23 to A, while: 


LET В=(3+4)%5 


assigns 35 to B. 


FORM OF A BASIC PROGRAM 


A BASIC program is made up of lines, each of which consists of a line number and one 
or more statements. The line number is a number between 1 and 65529. Note that line 0 
is not permitted. It is normal to have one statement on each line. However, when space 
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is short it is permissible to put more than one statement ona line, the statements being 
separated by colons (:) as in line 20 below: 


10 LET A=3 
20 LET B=4 :LET C=5 


There can be as many statements on a line as will fit, the length of a line being limited 
to 128 characters. Spaces may be included freely to improve readability but in this 
version of BASIC their use is not required. The last example could be keyed in as: 


2OLETB=4:LETC=5 


but is much more difficult to read than when spaces are used. Spaces are not allowed 
within the names of BASIC keywords. 


BASIC statement lines can be added to a program in in any order. BASIC rearranges 
them internally into ascending line number order. When a program is executed, the 
statements are executed in ascending line number order unless control is transferred 
to another line number by a statement such as GOTO. Only the most recent version of 
a line with a particular line number is retained. Entering a line number of a line already 
present in a program followed immediately by «RETURN? causes that line to be 
deleted, including its number. 


INTERNAL REPRESENTATION OF NUMBERS 


Numeric constants and the values of numeric variables are input and output by 
BASIC in decimal form and are held internally in a special binary floating-point 
(exponential) format. In Extended BASIC, 24 bits are assigned to the binary fraction 
and its sign, and 8 bits to the sign and magnitude of the binary exponent. This form is 
similar to the “scientific” format in which BASIC prints large and small numbers, 
except that the fraction always lies between a half and one and is raised to a power of 
two rather than ten. Futher details are given in the description of the VARADR 
command in chapter 18. 


The format allows a precision of somewhat better than 6 significant decimal places; 
when converted back to the decimal system, numbers are output to 6 significant 
figures with the last figure rounded. Thus the fraction 2/3 (two-thirds) is represented as 
0.666667. As mentioned above, the range of numbers that can be represented is 
approximately 1E 4-38 to 1E—38. Numbers less than the lower limit are rounded down 
to zero whilst numbers greater than the upper limit result in the error message: 


Arithmetic overflow 
and cause program execution to stop. 


This form of representation can sometimes give unexpected results. Although such 
results are not usually a problem in day to day work, the programmer should be aware 
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of the possibility of an apparently erroneous result occurring. The following examples 
illustrate what can happen. 


Some numbers, although they can be represented exactly in the decimal system, 
cannot be held exactly in the computer. The fraction 1/10 is an example. In decimal this 
is 0.1 and you know that if you multiply it by 1000, the result will be 100. This is also 
true in the computer. The program: 


10 LET T=1/10 
20 PRINT T*1000 


prints 100. You also know that if you were to add 0.1 to itself a thousand times you 
would still get the result 100. But this is not so in BASIC. The program: 


10 LET T=1/10 

20 LET $=0 

30 FOR 1=1 TO 1000 
40 LET S=S+T 

50 NEXT 

60 PRINT 5 


prints 99.9991 instead of 100. What has gone wrong? The answer lies in the fact that 
the fraction 1/10 cannot be held exactly. When we multiplied it by 1000, BASIC’s 
automatic rounding mechanism took care of the slight residual error and gave the 
correct result. But when you added in the slightly incorrect value of T a thousand 
times, you compounded the error a thousand fold; automatic rounding was insufficient 
to compensate. 


In a program you might need all the intermediate values of S. If so, a solution is to 
recalculate S each time through the loop, so that each intermediate value of S contains 
only one error. For example: 


10 FOR I=1 TO 1000 
20 LET $=1*0.1 

30 МЕХТ 1 

40 PRINT $ 


The PRINT statement in line 40 shows that the final value of $ is now correct. 


The problem can be summed up as an error due to the accumulation of many smaller 
errors. It can occur in the majority of implementations of computer languages, 
particularly on mini and microcomputers. 


The second example is less obvious. Several of the operations in BASIC convert 
numbers from their internal binary floating-point form to an exact whole number 
before use, a particular example being the evaluation of array subscripts. In Extended 
BASIC, as іп the majority of dialects of BASIC, this is done by truncation rather than 
by rounding. Thus A(2.5) refers to A(2), not A(3). The situation is made more confusing 
by the fact, already mentioned, that the PRINT instruction carries out slight 
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rounding. It is thus possible for a variable to have one value when printed and another 
when used as an array subscript, the second value being one less than the first, as the 
following example shows: 


10 LET T=1/10 

20 LET S=0 

30 FOR I=1 TO 30 

40 LET S=S+T 

50 NEXT I 

60 PRINT $ When printed, S is 3 
70 DIM АСЗ) 

80 LET A(2)=2 

90 LET А(3)=5 

100 PRINT A(S) But this prints 2! 


The internal value of S is in fact fractionally less than 3; when printed it is rounded up 
to 3, but when truncated to a whole number yields 2. 


Fortunately the problem is rare, tending to happen only with very large numbers and 
with smaller numbers when there have been many intermediate calculations, as in this 
case. A simple solution is to force rounding rather than truncation to take place by 
adding 0.1 to the subscript. Changing line 100 to: 


100 PRINT ACS+0.1) 
prints 3, as expected. 
Users may bereassured to know that Extended BASIC follows Dartmouth BASIC in 


using truncation to evaluate array subscripts. The problem is not confined to the 3807, 
and 480Z computers. 
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CHAPTER 4 


GENERAL PURPOSE UTILITY COMMANDS 


n response to the "Веаду:" prompt, the user can enter а command either with a line 


number (program mode) or without a line number (immediate or direct mode). In 
program mode, the user enters a sequence of BASIC command lines, each prefixed 


* 


with a unique line number, and when all requisite lines have been entered, the program 
can be run (executed) by entering RUN<RETURN>. In immediate mode, a command 
is entered without a line number prefix and is executed as soon as <КЕТОВМ> is 
pressed. 


Most of the commands in this section are normally used without line numbers, in 
direct mode. However, some commands, ERASE and RENAME for example, are 
often used within programs. 


Several of the commands described in this section require a file specification, which 
may be supplied within quotation marks, or in a string variable or expression. 
Examples are: 


LOAD "CIRCLES" 
ERASE F$ 


The file specification comprises a filename of up to 8 characters drawn from the 
character sets A-Z, a-z, 0-9 and $. Lower case letters are converted to the corresponding 
upper case letters. The filename may optionally be preceded by the name of the disc 
drive containing the disc onto which the file is to be written followed by a colon, as in 
the following example: 


SAVE "В: СКАРН" 


If the disc drive name is omitted, the drive used when BASIC was loaded is assumed. 
A three-character extension to the filename (secondary filename) may be supplied, 
preceded by a full stop. If omitted, .BAS is assumed. 


In addition, the output of commands such as LIST and DIR can be redirected to the 
printer or to a file. The mechanism for doing this is described in Chapter 12. 
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CONTINU 


fter pressing <CTRL/Z>, or after a program has executed a STOP or 
ND instruction, the message: 


Interrupted 


is displayed. You may resume execution by entering CONT. While the 
program is stopped, PRINT, LVAR or LET may be used to display or 
change the values of variables. CONT cannot be used after program 
modification or a runtime error. 


DELETE 25 
DELETE 25- 


DELETE 25-75 
DELETE -75 


These commands cause the deletion of lines 25, 25 to 75, 25 to the end, 
and lines up to line 75 respectively. 
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DIR DIR DIR '"Bz:x*.x' 


This command lists a disc directory on the screen in CP/M format. The л 
first form lists all files on the logged on disc which have an extension of 
-BAS. The second form can be used to perform other directory 
functions, the example listing all files on unit B. Note that on a 
Network, or when running under CP/M 2.2, files which have been given 
the $SYS attribute are not displayed. 


паш 


ERASE ERASE "STATS3" 


The specified file is erased. No error is reported if the file does not exist. p 
The filename must be unambiguous, i.e. it cannot contain * or ?. | 


You should not erase a file that is open, as this can cause odd results, 
particularly on a Network System. The command CLOSE INPUT can 
be used to close input files. The command CLOSE closes output files 


(See chapter 12). 


FSAVE 


LIST 


LLIST 


LOAD 
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FSAVE "CIRCLES" 


FSAVE acts like SAVE (described below), except that the program is 
saved in internal format. The advantage of internal format is that 
loading (see below) is very much faster, by a factor of five or more on 
large programs. However, programs saved using FSAVE are very 
much less portable than programs saved using SAVE and an internal 
format program saved using one version of BASIC cannot be loaded by 
another version of BASIC. The chances of recovering from a corrupted 
file are also very much less with internal format. Internal format files 
cannot be combined by the MERGE command. 


Because of these restrictions, it is suggested that FSAVE be used 
sparingly, and that you should never leave yourself in the situation 
where your only copies of a program are in internal format. (Recreating 
a BASIC program in ASCII format from its internal format version 
can sometimes be done using LOAD and SAVE, but the success of this 
depends upon the version of BASIC being used to read the internal 
format file being identical to that used in the original FSAVE.) 


LIST LIST 25 LIST 25-735 
LIST 25- LIST -75 


The specified lines of the program are to be displayed on the screen. The 
various forms display the whole program, line 25, lines 25 to 75, from | 
line 25 to the end, and from the beginning to line 75. 


The display may be interrupted by pressing <CTRL/Z>, or stopped 
temporarily by pressing <CTRL/S> and resumed by pressing 
<CTRL/Q>. Automatic paging is turned on and off by <CTRL/A>. 
When it is turned on, the display stops after the screen has been filled 
with lines of program. The cursor blinks to indicate that further lines 
can be displayed; press the space bar to display the following lines. 


LLIST LLIST 25 LLIST 25-75 

LLIST 25- LLIST -75 

Similar to LIST but the program is listed on the printer. A printer is 
normally selected by the PRINTER command (see below). If no printer 
option has been selected, the listing is displayed on the screen. 

On a network system the output will be sent to the network printer 


unless a local printer has been selected (see below). You must terminate 
this listing with CLOSE #2 (See chapter 12). 


LOAD "5ТАТ51" LOAD "B:STATS1.BAS" 


The LOAD command loads a program from disc storage. This 
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LOAD? 


LOADGO 
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command must include the name of a program, either enclosed in 
quotation marks or as a string variable or expression. This enables the 
disc directory to be searched for the desired program. If the program, 
which can be in either internal format or the normal ASCII format, is 
found, it will be loaded and BASIC will display the prompt " Веаду:". 
Any program previously being entered or run is lost unless saved. 
Not finding the program on the disc results in the message: 


File not found 


and finding the program in the wrong internal format gives: 


Wrong internal format 


LOAD? "CIRCLES" 


LOAD? will verify that a file on disc is the same as the program held in 
memory. It will only work on internal format files, and an attempt to 
use the LOAD? command to load an ASCII file will generate the 
message: 


Can't verify ASCII files 


Any difference between the files on disc and in memory results in the 
message: 


Files different 


otherwise BASIC merely displays the prompt: 
Ready: 


In neither case will either program be altered in any way. 


LOADGO "CIRCLES" LOADGO "PROG",100 

LOADGO loads the specified file, in either internal or ASCII format, 
and starts executing it. If no line number follows the filename, 
execution of the new program is started at the lowest numbered line, 


otherwise at the specified line. If no filename is given, the error 
message: 


Missing file name 


is produced. LOADGO is also available as a CP/M command line. Thus, 
from CP/M, the command: 


BASIC CIRCLES 


would load and run the program CIRCLES. In this case, noline number 
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line number is permitted. If the program is in the wrong internal 
format, the message: 


Wrong internal format 


is displayed. Note that the file name must not be enclosed in quotation 
marks when given from the CP/M command line. 


Like all commands which modify a program, LOADGO initializes all | 
variables and user-defined functions before executing it. 


MERGE "STATS2" 


The MERGE command allows you to combine lines of a program from 
a file on disc with a program already in memory. The command has a 
form similar to the LOAD command, in that it is followed by the name 
of the program to merge, enclosed in quotation marks or held ina string 
variable or expression. MERGE is similar to LOAD except that a pre- 
existing program line is only replaced when an incoming line has the 
same number. Otherwise the new lines are added. The RENUMBER 
command is useful for changing existing line numbers in order to 
prevent lines being inadvertently deleted when merging in additional 
ones with the same line numbers. 


The file must not have been previously saved using the FSAVE 
command. Attempting such a merge results in the message: 


Can't MERGE internal files 


MERGEGO "'"FUNX'' MERGEGO "CIRCLES",100 


The MERGEGO command is a combination of the LOADGO and 
MERGE commands described above. The specified file is merged into 
the current program and the new combined program is executed, 
starting at the specified line number if one is given, otherwise at the 
lowest line number. As with MERGE, МЕВСЕСО cannot cope with 
an internal format file, and if presented with one produces the error 
message: 


Can't MERGE internal files 
Also as with MERGE, any lines in the memory resident program with 
the same line numbers as lines in the program to be merged into it are 


overwritten. 


As with all commands that modify the program, MERGEGO 
initializes all variables and user-defined functions before executing it. 


The following program exemplifies the use of MERGEGO: 


4.1 


UTILITY COMMANDS 


10 INPUT "Function"; A$ 

20 ERASE "TEMP" 

30 CREATE #10, "TEMP" 

40 PRINT #10, "70 DEF ЕМУ (Х) ="; AS 
50 CLOSE #10 

60 MERGEGO "TEMP", 70 

80 GRAPH : TEXT 

90 FOR X=0 TO 79 

100 PLOT X, FNYOO, 2 

110 NEXT X 
120 INPUT "Another"; A$ 
150 IF A$-"Y" OR A$z"Y" THEN 10 


These commands are explained in Chapters 6, 7, 9, 11, and 12. 


NEW NEW 
The program, if any, is deleted. All variables are lost. The command is 
used to clear the program area prior to keying in a new program. 
PRINTER PRINTER 3 PRINTER 4,6 
LOCAL PRINTER LOCAL PRINTER 2,4 LOCAL PRINTER 


NETWORK PRINTER NETWORK PRINTER 
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The PRINTER command allows you to select a printer option directly 
from BASIC, without entering the Front Panel (see the System 
manual). It also allows printer selection under program control. The 
first argument selects which printer type to use, and the second, if 
present, is the baud code for serial devices. If a baud code is supplied for 
an option which does not require it (e.g. the parallel interface) then it is 
ignored. If the baud code is omitted for an interface which requires one 
(e.g. an SIO-4) then baud code 0 will be assumed. See Appendix D or the 
System manual for details of the significance of the terms “printer 
буре" and “‘baud code”. 


On a network system there exists the possibility of connecting a local 
printer to a station as well as a central printer serving the whole 
network. 


PRINTER sets options for a local printer only. 


LOCAL PRINTER directs all printed output to the local printer 
instead of the network printer, and may be followed by “printer type" 
and “‘baud code" parameters as in the PRINTER command. 


NETWORK PRINTER directs all printed output to the network 
printer instead of the local printer, and may not be followed by printer 
options. To set network printer options, use the program called 
CONFIG on your Network Maintenance disc, as described in the 
Network Users Guide. 
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RENAME "NEWFILE", "OLDFILE" 


The file OLDFILE.BAS is renamed to NEWFILE.BAS. The error 
message “Ее not found“ is reported if OLDFILE.BAS is not found. If 
NEWFILE.BAS already exists, BASIC prompts: 


File Exists--replace (Y/N): 
Enter Y to execute the rename. 
Care should be taken not to rename an open file, otherwise erroneous 


errors can occur on subsequent access to the channel on which the file 
was open, particularly on a network. 


RENUMBER RENUMBER RENUMBER 100,20 


RENUMBER 100 RENUMBER ,20 


This command is used to tidy up programs after editing. All line 
numbers, and internal references such as GOSUB 115, are adjusted. 
RENUMBER may be followed by two arguments: the new first line 
number and the line number interval. If either is omitted the default of 
10 is used. Thus the examples renumber the program from line 10 at 
intervals of 10, from 100 at intervals of 20 respectively, from 100 at 
intervals of 10, and from 10 at intervals of 20. Line numbers in REM 
lines, after MERGEGO, or in expressions (e.g. in comparisons with the 
ERL function described in Chapter 8) are not affected. 
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RESET 
RESET string 


RUN 
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RESET 
RESET "ADC" 


This command may be issued after changing a disc (on either a stand- 
alone or a network system) instead of having to issue an equivalent 
CP/M or CP/NOS command. Any data files currently open for input or 
output will be discarded. 


A series of checks is built into the CP/M operating system to prevent 
inadvertent overwriting of programs and data if you accidentally 
change a disc while a data file is open for writing. If you do try to write 
to a changed disc you will get an error message of the form: 


BDOS ERROR ON B: R/O 


Do not press «RETURN? or you might lose your program. You can 
recover by pressing <CTRL/F>, which enters the Front Panel, 
followed by J>103<RETURN>. This restarts BASIC. Issue the 
RESET command, then inspect your program with the LIST 
command to make sure it is intact before proceeding. 


On a network system the RESET command will be denied if another 
user has a file open on the disc drive(s) to be reset, and the optional 
string parameter can be used to specify the names of the drives to be 
reset. For example: 


RESET "ADBC' 


will attempt to reset logical drives A, D, B and C. In this case, a warning 
message is given for any drives for which the reset operation is denied. 


If issued without a parameter, RESET will attempt to reset all drives, 
and will not produce any warning messages. 


Note that RESET, RUN and LOADGO will cause any open files 
belonging to the user issuing that command to be discarded without 
being closed. This helps to avoid certain unnecessary errors, but does 
result in any output files that have not been closed being lost. (This 
does not apply to spooler files). 


RUN RUN 100 


All variables are initialized and the program is started at the lowest 
numbered line if none is given, or at the specified line number (100 in the 
second example). 
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SAVE "5ТАТ5 53" SAVE "В: $ТАТ$ 5 .ВАЗ'' 


The SAVE command saves а program on disc. Like the LOAD 
command, it must be followed by a program name, enclosed in 
quotation marks or held in a string variable or expression. When the 
program is saved, BASIC returns the prompt “Кеаду:”. 


On a stand-alone system it is important to check, before issuing a 
SAVE command, that there is a disc in the selected unit and to make 
sure that you have not changed the disc in the unit since starting 
BASIC. If you have, issue the RESET command before the SAVE 
command, otherwise you will get a BDOS Read Only error (see 
RESET). 
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CHAPTER 5 
EDITING 


The editing facilities described in this chapter are equally applicable to both stand- 
alone and network operation. This chapter deals in turn with the editing facilities 
available to the 380Z and 480Z computers. 


Simple editing can be accomplished by retyping the corrected line, but use of the 
editing facilities of BASIC will usually be easier and more reliable. On the 480Z the 
function keys are used for editing and any text typed will automatically be inserted at 
the cursor position. With the 380Z editor <SPACE> and <DELT> are used to move 
the cursor along the line and insertion must be specifically requested. 


380Z EDITING 
This Section describes the use of the 3807; EDIT command. 


EDIT 


EDIT 55<RETURN> 


When the EDIT command is executed, the specified line (55 in the 
example) is copied into the edit buffer. Commands can be issued to modify 
the line, and to put the corrected line back into the program. 


While operation of EDIT is quite simple, it is rather different from most 
character- and line-oriented text editors, so learning EDIT can prove 
difficult. However, a familiarity with at least some of the commands, 
especially «SPACE», <DELT>, <I>, and <RETURN>, does speed 
program development. Most of the commands do not reflect the typed 
characters, and some cause no change at all on the screen, which can cause 
confusion to novices. 


EDIT maintains a pointer within the buffer. Under normal circumstances 
all of the characters to the left of the pointer are displayed on the screen, 
whilst those to the right are not. However, this simple scheme can get out 
of step following the <D> and <DELT> commands, so the current 
position of the pointer should always be kept in mind. 


Many of the commands take an optional numeric argument, which causes 


the command to be repeated the specified number of times. The number, 
which should lie in the range 1-255, must be typed before the command. 
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RETURN 


ESC 


nSPACE 


nD 
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There is no effect on the screen while a number is being typed. The numeric 
argument defaults to 1. In the detailed description of the commands 
below, such numeric arguments are denoted Бу "п". The commands are in 
alphabetical order: a short example appears at the end of this Chapter. 
Illegal commands are ignored. 


<RETURN> 


The line to the right of the pointer is displayed and the original line is 
replaced with the edited version. This is the normal way to end an edit 
session. 


<ESC> 


<ESC> terminates any command sequence. In particular, it resets any 
partly-entered number to 1, and it terminates Insert mode. 


6<SPACE> 


Pressing the space bar will move the pointer right, reflecting the character 
it steps over. 6<SPACE> will move the pointer six characters, reflecting 
the skipped characters. 


<A> 


Pressing <A> causes the current attempt at editing the line to be 
abandoned. The buffer is refilled from the original program line, and the 
pointer is reset to the beginning of the line. This command is useful if an 
edit has become confused. 


<D> 7<D> 


The n characters after the pointer are deleted. The deleted characters are 
echoed between backslashes (1). These characters may appear as a half (1%) 
with some versions of COS, or as forward slash (/) with others. 


<E> 


<E> exits the editor and implements the changes but the amended line is 
not typed out. This command was designed for use with very slow output 
devices in mind, and is probably not useful on the 380Z using the normal 
screen. 
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«F»3 3<F>A 


Find the nth occurrence of character c and move the pointer to just before 
it. If there are fewer than n occurrences of c, the pointer is moved to the end 
of the line. 


<H> 


Everything to the right of the pointer is deleted and Insert mode entered. 
See <I> command for details of Insert mode. 


<I> 


Enter Insert mode. Subsequent characters are entered directly into the 
buffer. Insert mode is terminated either by <ESC>, which merely 
terminates Insert mode, or <RETURN>, which leaves EDIT and updates 
the line. <DELT> will remove incorrect characters, even those to the left 
of the position of the pointer when Insert mode was entered. However, the 
line number cannot be changed. Insert mode can thus be used to delete or 
replace faulty text only. 


<К>А 4<K>0 

Kill (delete) all characters from the pointer up to but not including the nth 
occurrence of character c. The pointer is left positioned just before this 
character. The <K> command has no discernible effect on the screen. If 


there are fewer than n occurrences of the character c to the right of the 
pointer then the remainder of the line will be deleted. 


<L> 

The line to the right of the pointer is displayed and the pointer returned to 
the beginning of the line. 

<Q> 

The Edit is abandoned without implementing the changes made. Control 


is returned to command level (the “Веаду:” prompt). This command is 
useful after an edit has become totally confused. 
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<R> 3<R> 


The n following characters in the buffer are replaced by the next n 
characters from the keyboard. <ESC> and «RETURN? are treated as in 
Insert mode, i.e. <ESC> aborts the В command and «RETURN? leaves 
EDIT and implements the changes. The other control characters and 
<DELT> are ignored. 


<X> 

«X» moves the pointer to the end of the line and Insert mode is entered. In 
effect, new characters are appended to the line. 

<DELT> 8<DELT> 


<DELT> will move the pointer to the left, backing the cursor over the 
skipped character. 6<DELT> will back over 6 characters. <DELT> is 
essentially the reverse of <SPACE>. Note that in Insert mode, <DELT> 


removes characters from the buffer. <DELT> will not move the cursor 


past the line number. 


As an example of 380Z editing, we will change BROWN to RED in: 


10 DATA THE QUICK BROWN FOX 


In the following, only <SPACE>, <DELT>, «RETURN? and the <I> command are 


used: 


User types EDIT 10<RETURN> 

Computer 10 

User types 20<SPACE> 

Computer 10 DATA THE QUICK BROWN 
User types I<D><D><D><D><D> 

Computer 10 DATA THE QUICK 

User types RED<RETURN> 

Computer 10 DATA THE QUICK RED FOX 


The usual sequence in editing is: 


грее 


Enter EDIT 

Move pointer and enter Insert mode 
Delete and/or insert 

Exit from Insert mode and from EDIT 


We recommend that you practice thoroughly with this subset of the EDIT commands 
before attempting to add the more complex ones to your repertoire. 
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480Z EDITING 
This Section describes the use of the line editing capabilities of BASIC on а 480Z and 
the EDIT command. 


Line Editing 


It is possible to move the cursor backwards in the line to carry out alterations as long 
as «RETURN? has not been pressed. Non-printing characters are used to perform 
these editing functions. These control characters are obtained by holding down the 
_ CTRL key and typing a character but most of the commonly used characters are 
available on the function and arrow keypad. Some of the functions also require the use 
of the SHIFT key. 


A plastic overlay is available to fit around the function and arrow keypad, showing the 
effects of the keys during line editing. 


As characters are typed to BASIC, printing characters are entered into the buffer at 
the cursor position if there is room in the buffer. If there is insufficient room, BASIC 
sounds the beeper. 


The following list describes the available editing functions: 


«Left arrow? Cursor left 

«Right arrow» Cursor right 

«Ор arrow? Cursor up 

«Down arrow»? Cursor down 

«F1» Delete character backwards 

«F2» Delete character forwards 

«F3» Find next character typed (backwards) 
«КА» Find next character typed (forwards) 
<ЅНІЕТЛе# arrow? Cursor to beginning of line 
<SHIFT/right arrow? Cursor to end of line 

<SHIFT/up arrow> Delete line or restart edit in EDIT mode 
<SHIFT/down arrow> Delete line (from buffer only in EDIT mode) 
<SHIFT/F1> Delete to beginning of line 

<SHIFT/F2> Delete to end of line 

<SHIFT/F3> Delete to next character typed (backwards) 
<SHIFT/F4> | Delete to next character typed (forwards) 
<CTRL/M> or <RETURN> Terminate line 

<CTRL/Z> Erase line, halt execution of program 
<CTRL/L> Clear screen, cursor bottom left 
<CTRL/__> Clear screen, cursor top left 

<CTRL/E> Toggle printer echo (see text) 

<CTRL/P> Toggle printer echo (see text) 

<CTRL/F> Enter Front Panel (after check) 
<CTRL/C> Enter operating system (after check) 
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This editing mechanism is available for both entry of program lines and for data 
entered in response to INPUT LINE or LINE INPUT. At all times except after the 
clear screen commands, the current state of the line is displayed, with the cursor 
symbol flashing over the character after the cursor position. If the cursor is at the end 
of the line it will flash or be steady depending on the state of the monitor. An attempt 
to move the cursor beyond the start or end of the line moves it to that boundary. The 
functions obtained by <F3>, <F4>, <SHIFT/F3> and <SHIFT/F4> require that a 
character is entered at the keyboard. For the find commands, the cursor is moved to lie 
on top of the next occurrence of the designated character in the specified direction. For 
the delete commands, characters are deleted up to and including the designated 
character. 


During line editing in this manner, the printer echo process, set with <CTRL/E> or 
<CTRL/P>, is disabled and the effect of the WIDTH statement is suspended. If 
printer echo is set, the line is reflected to the printer after the terminating 
«RETURN? is pressed. The effect of WIDTH is only available for material typed by 
the computer, usually as the result of a program running. Pressing <CTRL/E> or 
<CTRL/P> during line editing switches the state of the printer echo flag which will be 
used after editing is complete, but no visible indication is provided for these keys. 


Itis possible for a program to alter the effects of the function and arrow keys with the 
PUT command. Although EDIT (q.v.) resets these keys to suitable values, normal line 
entry does not. Attempts to enter a line after a program has altered the function and 
arrow keys may therefore become confused. Strange effects will be produced if a 
window is defined which is too small to hold the line being edited. 


The EDIT Command 


The EDIT command can be used to alter a line after «RETURN? has been pressed. 
The format of the command is: EDIT «line number? 


The specified line is transferred to the line editing buffer and the cursor is placed after 
the line number. Thereafter, editing proceeds much as for normal line editing. The only 
exceptions are: 


«SHIFT/up arrow»? restarts edit with fresh copy of line 
<SHIFT/down arrow» abandons edit without affecting the line 


The function and arrow keys are also initialized. <SHIFT/up arrow? will work until 
the line is terminated by either <CTRL/Z> or <ВЕТОВМ>. The line number is treated 
like any other part of the line and can be altered in the same way. 


Line edit mode is terminated by <CTRL/Z> or <RETURN>. On exit, the old line will 
be left intact and the new line inserted into the program, overwriting any existing line 
with that number. 
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CHAPTER 6 
DATA TRANSFER COMMANDS 


As described in Chapter 3, variables are the names of spaces in memory reserved for 
the storage of data, which may consist of numbers, strings of characters, arrays of 
numbers, or arrays of strings. 


Enough string space should be reserved by a CLEAR statement to hold all the 
characters that will be stored in string variables during execution of the program. 


Numeric and string arrays should be dimensioned with a DIM statement before use. If 
a DIM statement is omitted, or if a value is assigned to an array element before a DIM 
statement for that array is executed, BASIC assumes limits of 0 to 10 (11 elements). 


For these reasons, it is usual for CLEAR and DIM statements to be among the first in 
a program. CLEAR should occur before DIM. 


CLEAR 


10 CLEAR 20 CLEAR 2000 
All variables and arrays are cleared. If a number follows, as in the second 
example, space is reserved to store that number of characters in string 
variables. Thus the second example reserves storage for up to 2000 
characters. If the number is omitted, the string area is not changed. When 
BASIC starts, space for 100 characters is reserved. 

If a program runs out of string space during execution, the error message: 

No string space 


is displayed and program execution stops. You can discover the current 
size of string space by the statement: 


PRINT FRE(X$) 
and the current amount of free memory by the statement: 

PRINT ЕКЕСХ) 
Neither X$ nor X are altered by these statements. String space can be 
increased by the CLEAR statement until free memory becomes quite 


small, but some free memory will be needed for statements such as FOR 
and GOSUB, depending on the program. 
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DATA 


DIM 


Another form of the CLEAR statement is permitted in Extended BASIC, 
of the form: 


CLEAR 200,,1024 


in which the second number adjusts the size of cache memory. Cache 
memory is used in conjunction with machine language routines. Note the 
peculiar syntax with the two commas. These are required to allow for an 
extension in BASIC Version 6 (see Chapter 13). 


50 DATA 5,4,3 
20 DATA BLUE,RED 30 DATA "BLUE,RED" 


Numeric or string constants can be specified ina DATA statement ready 
for assigning to variables by means of a READ statement. 


Special care is needed if string data is to contain spaces or commas. The 
safest way to deal with this is to place the strings between quotation 
marks, for example: 


20 DATA " GONE AWAY, BACK SOON" 
is taken as a single string with a space before GONE. 


Spaces may be inserted in a string without quotes after the first character, 
for example: 


20 DATA GONE AWAY, BACK SOON 


would be taken as two strings without a space before GONE or after the 
comma. 


10 DIM А(20), В(30,5), А$(40), DCJ) 


Ordinary variables take the forms A, АТ, X9 (numeric) or A$, A78, X9$ 
(string). Array variables require a DIM statement to reserve space for 
them. For example, DIM A(20) would reserve 21 array elements A(0), A(1), 
A(2)...A(20). As shown in the example, a single DIM can dimension more 
than one array. A value would have to have been assigned to J before the 
DIM statement was executed. If an attempt is made to DIMension an 
existing array, the error message: 


Re-dimensioned array 


is produced and program execution halts. 
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10 LET А=В+2 10 AS="HELLO" 


The word LET is optional. The expression on the right hand side of 


the = sign is evaluated and the result is assigned to the variable on 
the left hand side. The reader is advised to think of assignment (LET 
commands as: 


А — В+2 


which should be read аз “А becomes equal to the value of В plus 2”, 
although, of course, the = notation must be used. 
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READ 


RESTORE 
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means of the RESTORE command (see below). 


For example, the statement: 

LET A=A+1 
will increase by 1 the value stored in A. 
If an attempt is made to assign a string to a numeric variable, or vice 
versa, the error message “Type mismatch" is displayed and program 
execution is halted. 
For example, the statement: 


LET А = "123" 


is not acceptable. 


50 READ A,B,C 40 READ AS$,B$ 


The READ instruction collects values from DATA statements and 
assigns them to the specified variables. Data is picked up from DATA 
statements in strict order. If there is more than one line of DATA, the 
lowest line number is taken first. Attempts to READ more data than 
exists will cause the error message: 


Out of data at line n 


where n is the line number of the READ instruction currently 
executing. 


Numeric DATA can be READ into a string variable because it is also 
string data. String DATA cannot be READ into a numeric variable. 
Bearing this in mind, and noting that there is only one data pointer, 
the programmer must ensure that the DATA matches the READ 
statements exactly. 


The data pointer can be placed at any position in the program by 


80 RESTORE 50 RESTORE 100 


The data pointer is reinitialized to point to the start of the data so that 
it can be used again. If по line number is given, RESTORE leaves the 
data pointer at the first DATA statement in the program. If a line 
number is supplied, as in the second example, it is left at the first 
DATA statement after the specified line. 
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CHAPTER 7 


CONSOLE AND PRINTER INPUT/OUTPUT 


This chapter describes INPUT and PRINT, the two main commands used in BASIC 
for reading the keyboard and outputting to the screen. Some variants of these are also 
described, together with a group of commands that help in formatting output. 
Consideration of data transfer to and from data files is deferred until Chapter 12. 


INPUT 


50 INPUT A 50 INPUT A,B 
50 INPUT "АМЗИЕК"; A$ 


The program pauses to allow the user to enter data at the keyboard 
which will be assigned to the specified numeric or string variables. 
When BASIC executes an INPUT command, a question mark is 
displayed on the screen. Taking as an example the program fragment: 


10 INPUT A 
20 PRINT A 


the following would appear on running the program: 


RUN 
? 


BASIC waits for the user to enter some data and press «RETURN? : 


RUN 
? 2<RETURN> 
2 


Ready: 


If <ВЕТОВМ > is pressed without any data being entered, either a 
numeric value of zero or a null (empty) string is assumed. 


More than one variable can be specified in an INPUT command. In 
this case, the entered items should be separated by commas. If 
insufficient items are entered, BASIC prompts the user to enter the 
remainder with a double question mark. If too many are entered, the 
error message ''*Extra lost" appears. Using the earlier example: 


RUN 

? 3,4 
*Extra lost 
3 


Ready: 
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INPUT LINE 


If a number is expected and characters which cannot form part of a 
number are typed in, the error message ‘‘* Invalid input” is displayed 
and all data for that INPUT statement must be retyped. Again using 
the example program: 


RUN 
? 1/4 
Invalid input 
? 0.25 
.25 


Ready: 


An explanatory string is allowed after INPUT, enclosed in quotation 
marks and terminated by either a semicolon (;) or a comma (,). It is 
printed before the program pauses, instead of a question mark if the 
terminating character is a comma, else аз well as the question mark. If 
an INPUT statement is interrupted by entering <CTRL/Z> and the 
program then continued, the prompt is repeated. An alternative 
method of prompting is to use the PRINT statement (see below). 


It is important that data should be entered from the keyboard in a 
form that matches the variables in the INPUT statement. Wrong 
data or too much data causes the error messages already described. 
Special care is needed when string data is required to contain commas 
or leading spaces. One way of dealing with this is to type the string 
between quotes. For example, the response: 


? " GONE AWAY, BACK SOON"! 


is regarded as a single string with a space before GONE. The INPUT 
LINE instruction provides another way of achieving this. 


Spaces may be inserted in a string without enclosing it in quotes, if 
they occur after the first character. Thus: 


? GONE AWAY, BACK SOON 


counts as two strings, each containing exactly one space. The spaces 
immediately after the question mark and the comma are ignored. 


50 INPUT LINE "Please type your name: ", N$ 


The INPUT LINE instruction differs from INPUT in that only a 
string variable can be specified. The whole of the entered data is 
transferred to the variable, including spaces and commas, without the 
need to enclose the data in quotation marks. If more than one variable 
is present, BASIC prompts for additional input with a double 
question mark. 
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INPUT LINE can be used in writing “safe” programs that are less 
likely to be stopped by invalid data; the process of validating the data 
can be carried out by programmed instructions rather than being left 
to the BASIC interpreter. This statement may take the alternative 
format LINE INPUT. 


50 PRINT 50 PRINT "ANSWERS АКЕ'';А,В 


Values of variables or messages are printed on the screen. The word 
PRINT is followed by a sequence of variables, expressions, or strings 
enclosed in quotation marks. Each item except the last in the 
sequence should have a semicolon or comma after it. 


The instruction PRINT by itself merely outputs a blank line. A 
number or the result of a numeric expression is output with a space 
preceding it if it is positive, or a minus sign if negative, and with a 
space following it. A quoted string, string variable, or string 
expression is output with no spaces added. 


When two numbers are separated by a semicolon, they are always 
separated by at least one space. For example, the program fragment: 


10 LET A=2 
20 PRINT A;A 
50 PRINT -А;-А 


would produce: 
RUN 
2 г 
eg -2 
Ready: 


When two strings are separated by a semicolon, they are output 
without any intervening spaces: 


10 LET M$z'MARY" 
20 LET J$="JANE" 
30 PRINT M$; J$ 
RUN 

MARY JANE 

Ready: 


Commas between items cause the items to be printed in columns 
spaced 14 positions apart. The form: 


PRINT A,,B 


is allowed and results in the value of B being printed at column 28. 
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LPRINT 


A semicolon or comma after the last item suppresses the new line 
which would otherwise follow the printing of that item. Rather than 
being at the beginning of a line, the output from the next PRINT 
statement will start where the current one leaves off. 


The symbol ? may be used as a synonym for PRINT. Its use in 
programs does not improve their readability but it is often convenient 
for inspecting the value of a variable in direct mode. 


Output from the PRINT statement may be echoed to the printer by 
pressing <CTRL/P> or <CTRL/E>. See Chapter 2. 


50 LPRINT 50 LPRINT "ANSWERS ARE'';A,B 


This instruction is the same as PRINT except that its output goes to 
the printer, not the screen. Note that the command CLOSE $2 is used 
to terminate output to the printer when BASIC is being used on a 
network. (See Chapter 12). 


The next two instructions, SPC and TAB, are only allowed as part of a PRINT or 
LPRINT statement. 


SPC 


TAB 


POS 
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40 PRINT А; $РС (5); В 


Extra spaces (5 in the example) are placed between the two printed 
values in addition to the space that follows A and the space, or minus 
sign, before B. 


25 PRINT А; ТАВ( 25); В 


The TAB command causes Ше screen cursor or printhead to move to 
the indicated column. Columns are numbered starting from zero. In 
the example, the space or minus sign that precedes the value of B 
would be output in the 26th column, i.e. column 25. 


If a TAB command indicates a position prior to the current cursor or 
printhead position, the current position is not changed. 


40 LET P=P0S(0) 


The POS function returns the current position of the screen cursor, in 
columns numbered from zero. In the example the cursor position is 
stored in variable P. The value of the function argument must be zero. 
The use of other values is described in Chapter 12. 
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40 LET P=LPOS(D) 


_ Аз POS, but returns the position of the printhead on the device 


accessed by the L commands. D is a dummy argument. 


10 WIDTH 40 


When BASIC starts, the screen width is considered to be infinite. 
Output that results in the cursor moving off the end of one line is 
continued on the next line with no special action being taken. The 
WIDTH command sets the logical width of the screen such that 
BASIC automatically begins a new line after the specified number of 
characters has been output. To return BASIC to its initial state, 
reissue the WIDTH command with a value of zero. 


The requested width must lie in the range 14-255, or be zero. 


10 LWIDTH 72 


As WIDTH, but sets the logical width of the printer. LWIDTH is 
initially set to zero, giving an infinite width. It may be reset to any 
value in the range 14 to 255, or zero. 


10 NULL 3,0 


After each line has been output to the console BASIC usually sends a 
carriage-return/line-feed pair of characters, in order to position the 
cursor at the beginning of the next line on the screen. The NULL 
command will cause BASIC to follow each CR/LF with a character, 
repeated the number of times specified by the first argument of 
NULL, the ASCII code of which is specified by the second argument 
of NULL. The example follows each CR/LF with three NULs (ASCII 
code 0). 


On a 480Z or Varitext 380Z the command NULL 2,11 can be used to 
achieve downwards scrolling. 


The NULL command is primarily intended to help users of certain 
printers, such as the Texas Instruments Silent 700 and some 
Teletype printers, which require time for the carriage to return before 
starting a new line. It has also been found useful for indentation or for 
printing in double-width mode. 


10 LNULL 35,0 
As for NULL, but refers to the printer. Note that where a particular 


type of printer requires null characters, it is useful to send them with 
both LNULL and NULL to allow use of the <CTRL/P> echo facility. 
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CHAPTER 8 


PROGRAM CONTROL AND 
STRUCTURAL COMMANDS 


Normally, program lines are executed sequentially, in numerical order. This chapter 
describes the commands available for altering this order. 


UNCONDITIONAL TRANSFER 


The following two commands transfer execution to the specified line number 
unconditionally. 


GOTO 


GOSUB 
RETURN 


80 GOTO 150 90 GO TO 180 


The GOTO command causes execution of the program to be continued 
at the specified line number. As shown in the examples, the forms 
СОТО and GO ТО are both allowed. If a line with the specified line 
number does not exist, the error message: 


Undefined statement 


is displayed and the program is halted. А check is made that the line 
number terminates the GOTO statement. 


100 GOSUB 250 250 RETURN 


Before executing a GOSUB command, BASIC notes its location. 
Program execution is then transferred to the specified line number 
which is usually the start of a subroutine. The last statement executed 
in the subroutine should be a RETURN command. When this 
RETURN statement is reached execution is transferred back to the 
statement following the GOSUB command. 


The forms GOSUB and GO SUB are both allowed. If a RETURN 
command is encountered without a preceding GOSUB, the error 
message: | 


RETURN without GOSUB 


is displayed and the program halts. A check is made that the line 
number terminates the GOSUB statement. If control is transferred 
with ON BREAK or ON ERROR or ON EOF, any active GOSUBs are 
left on the stack. This may cause problems if attempts are made to 
resume execution inside subroutines. 
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CONDITIONAL TRANSFER 


The IF...THEN...ELSE construct allows the programmer to execute statements 
depending on particular conditions. 


IF... THEN 


ELSE 
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10 IF A=2 THEN PRINT B 


The keyword IF is followed by a Boolean expression. The keyword 
THEN is followed by any statement, which will be executed if the 
Boolean expression is true. Thus, in the example, the value of B is 
printed if the value of A is equal to 2, but not otherwise. In either case, 
execution continues with the next line. 


A Boolean expression is any numeric expression, but is often a 
relational expression constructed from two numeric or string operands 
separated by a relational operator. The two operands must be of the 
same type, numeric or string. The available relational operators are: 


= Is equal to 

<> s not equal to 

> Is greater than 

< Is less than 

>= Is greater than or equal to 
<=  Isless than or equal to 


The two-character operators may be written ><, =>, or =<, without 
change of meaning. 


As mentioned in Chapter 3, Boolean expressions may be prefixed by 
the NOT operator and may be combined with the AND and OR 
operators. | | V I 


of a simple numeric expression, variable or constant, it is considered 
false if equal to zero, or true otherwise. 


In the special case where the IF statement governs an unconditional 
transfer of control using GOTO, for example: 


10 IF A=2 THEN GOTO 100 
either "THEN" or “СОТО” may be omitted. The forms: 


10 IF A=2 THEN 100 
10 IF A=2 GOTO 100 


are permissible, and have an equivalent effect to the previous example. 


10 IF А=2 THEN PRINT B ELSE PRINT С 


If the Boolean expression following the IF keyword is false and an 


When a Boolean expression consists 
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ELSE clause is provided, it is executed. An ELSE clause extends from 
immediately after the ELSE keyword to the end of the line. If the 
Boolean expression is true and the THEN clause is executed, the ELSE 
clause is skipped. A THEN clause extends from immediately after the 
THEN keyword to immediately before the ELSE keyword, if present, 
or to the end of the line if not. 


From the foregoing it will be evident that either the THEN clause, or 
the ELSE clause, or both, may include a compound statement, i.e. a 
series of statements separated by colons. 


The following example should clarify the behaviour of 
IF... THEN...ELSE: 


10 LET J=1 :LET K=2 

20 IF 2>1 THEN LET J=2 :LET K=3 

30 PRINT J,K 

40 ТЕ 2<1 THEN LET К=0 ELSE LET K=5 
50 PRINT J,K 


RUN 

2 3 
2 5 
Ready: 


SELECTION 


Two commands are available which allow the next line executed to be selected from a 


list. 


ON...GOTO 


10 ON X GOTO 400,500 


ON is followed by a numeric variable or by an expression returning a | 
numeric result. GOTO is followed by a list of one or more line numbers, 
separated by commas. The value following ON determines to which line 
number program execution will pass. 


In the example, if X = 1, execution is transferred to line 400, and if X = 
2. to line 500. If X less than one or greater than 2, execution continues 
with the next statement after line 10. If X is less than —65536 or 
greater than 65535, the error message: 

Illegal function 


is displayed and the program is halted. 
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ON..GOSUB 10 ON Y GOSUB 400,500 


The ON...GOSUB construct is similar to ON...GOTO, described above, 
except that the statements whose numbers are in the line number list 
are called as subroutines. Each should end with a RETURN. When the 
RETURN command is executed, execution reverts to the statement 
following the ON...GOSUB statement. 


The same restrictions and defaults apply to the numeric value 
following ON as with ON...GOTO. The example calls the BASIC 
subroutine at line 400 if Y — 1, or at line 500 if Y — 2. 


LOOP CONTROL 

Extended BASIC provides two statements which aid loop construction. These are the 
FOR and NEXT statements. 

FOR.TO.STEP 0. FOR X=1 TO 10 FOR Z=10 TO 1 STEP -1 
NEXT NEXT X NEXT Z 


8.4 


The lines between the FOR statement and the NEXT statement are 
executed repeatedly until the loop control variable has taken all the 
values defined by the FOR statement. The first such value is the value 
of the expression following the equals sign, and further values are 
obtained by adding the STEP value (or 1 if it is omitted) until the TO 
value is reached or exceeded. Thus, in the first example, X successively 
takes the values 1, 2, ..., 9, 10, and in the second Z takes the values 10, 9, 
... 2, 1. The variable in the NEXT statement must correspond to the 
variable in the FOR statement. If it does not, the error message: 


NEXTwithout FOR 
is produced. 
The statements in the loop are always executed at least once, even if the 


initial value is greater than the final value. Thus, the program 
fragment: 


produces 


NL 
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FOR loops may be nested to any depth. That is, constructs of the form: 


100 FOR X=1 TO 10 
110 FOR Y=1 TO 10 
120 LET АСХ,Ү) =0 
130 NEXT Y 
140 NEXT X 


may be used. 


The variable in the NEXT statement may be omitted. In this case, the 
variable used in the most recently executed FOR statement is 
assumed. Several variables may be specified in a single NEXT 
statement, separated by commas. The effect is the same as specifying 
the variables in a series of NEXT statements. It is probably wisest to 
avoid both of these facilities, on the grounds of clarity and portability. 


The size of the STEP on a FOR loop is checked and if it is zero the error 
message “Illegal function” is printed and program execution stops. 


A problem exists because of the way Extended BASIC handles its 
nested FOR loops. Whenever a FOR statement is executed, BASIC 
checks to see whether the specified variable is already being used as a 
loop control variable. If it is, the stack is cleared of all FOR loops up to 
this point. This means the following program fails: 


10 FOR X=1 TO 10 
20 IF X23 THEN 40 
50 NEXT X 

40 FOR Y=1 TO 10 
50 FOR X=1 TO 10 
60 PRINT Х; 

70 NEXT X 

80 PRINT 

90 NEXT Y 


RUN 
12345678 9 10 


NEXT without FOR at line 90 


Ready: 


The FOR loop at line 40 is cleared when the FOR loop at line 50 is set up, 
because there is already an active FOR loop using variable X. . 


If control is transferred with ON BREAK or ON ERROR or ON EOF 
(see Chapter 12) any active FOR loops or GOSUBs are left on the stack. 
This may cause problems if attempts are made to resume execution 
inside loops. 
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ERROR HANDLING 


The following commands allow user control of error situations. 


ON ERROR ON ERROR GOTO 100 


RESUME 


ERR 


8.6 


Normally, when an error occurs, BASIC prints an error message and 
execution halts. It is occasionally useful to control what happens in the 
event of an error, and ON ERROR does this. The command specifies 
the line which should be executed if an error occurs. An error cancels 
the ON ERROR switch, soa second error will cause BASIC to print the 
error message. Thus, it may be convenient to make the error handling 
routine contain an ON ERROR statement. 


The form ON ERROR cancels the effect of a previous ON ERROR 
GOTO..., and normal BASIC error handling resumes. Note that after 
transferring control via ON ERROR, any current FOR loops or 
GOSUBs remain active. 


Any ON ERROR flag is cleared when BASIC is re-entered via its 
restart address (normally 103 hex). This means that the program does 
not automatically resume execution. 


RESUME 
RESUME 150 (V.6 only) 
RESUME NEXT (V.6 only) 


RESUME is used to resume program execution after an error has 
occurred and been trapped with ON ERROR. BASIC goes back to 
execute again the statement which caused the error. Some caution is 
clearly necessary with RESUME to avoid creating an infinite loop. 


If a RESUME statement is encountered and no ON ERROR trap has 
been set, the message: 


RESUME without error 
is produced and program execution stops. 
LET B-ERR 
ERR returns the number of the most recent error. A list follows of error 


numbers and the identifying message associated with each one. 
Appendix B gives further information including likely causes. 
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In the following list certain errors are marked D, C, 6 or N. 


Those marked D apply only to disc systems; cassette systems will generate 
Unknown Error for these numbers. 


om Those marked C apply only to cassette systems; disc systems will generate 
_ Unknown Error for these numbers. 


Those marked 6 apply only to Extended BASIC Version 6; Version 5 will 
generate Unknown Error for these numbers. 


Those marked N apply only to network systems; stand-alone systems will 
generate Unknown Error for these numbers. 


m Error Codes 
] External error 33 No output file 
p 2 NEXT without FOR 34 Invalid device 
ZA 3 Syntax error 35 Invalid file name 
4 RETURN without GOSUB 36 Write error 
5 | Out of data 37 Wrong internal format 
6 Illegal function 38 File not found 
7 Arithmetic overflow 39 D Directory full 
8 Out of memory 40 D No disc space 
9 Undefined statement 41 D Output close error 
y 10 Subscript out of range 42 C ROM Pack Read Error 
11  Redimensioned array 43 М Read only file/disc 
12 Сап divide by zero 44 М ЕПеїпизе 
m 13 Illegal direct 45 М Тоо many files on Network 
Е 3 14 Type mismatch 46 N Not logged in 
15 | № string space 41 N Unknown I/O error 


16 String too long 
f^ 17 String too complex 
18 Can't continue 
19 Undefined user call 
20 Illegal EOF 
21 Files different 
22 Recovered 
23 Name not found 
24 Can't verify ASCII files 
25 Can't merge internal files 
26 Unknown error 
27 Read error o HIE Ec 
28 RESUME without error OTHER Unknown error 
29 Record too long | 
30 Invalid unit number 
31 Missing file name 
32 No input file 


In future versions, further errors will be assigned numbers upwards from the 
current limit. For a full description of the meaning of these error messages, see 
Appendix B. In earlier versions of BASIC, error number 26 generated the 
message “Missing Statement Number". This error no longer occurs. 
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ERL 


ERROR 


LET A=ERL 


ERL returns the number of the line on which the most recent error 
occurred. Note that BASIC will not RENUMBER any line number 
which is being compared with ERL, so beware of problems arising from 
using RENUMBER in programs containing such lines as: 


IF ERL=200 THEN ... 
ERROR 3 ERROR 
ERROR causes BASIC to react as if the specified error had just 
occurred. If no arguments are given, ERROR generates error 0, 


"Unknown error”. Otherwise, the error is chosen from the list given 


for ERR. 


KEYBOARD INTERRUPT CONTROL 
ONBREAK ОМ BREAK GOTO 1000 ON BREAK 


8.8 


—— Т УС ЧОЛИОЕНИОиено 


In а manner similar to ON ERROR, ON BREAK traps an attempt to 
interrupt a running program with <CTRL/Z> from the keyboard, and 
redirects program execution to the specified line. The form ON 
BREAK disables this feature, as does responding to <CTRL/Z>. Some 
caution is advised with ON ВВЕАК, as with a little effort it is possible 
to write a program which cannot be interrupted except with 
<CTRL/F> or <CTRL/C>. 


The main use for ON BREAK is to tidy up any loose ends which may 
remain after interrupting the program. Such uses include issuing a 
TEXT command (see Chapter 11) to disable graphics, or call a machine- 
code subroutine (see Chapter 13), perhaps to disable interrupts or clear 
the High Resolution Graphics screen. The ON BREAK command is 
not really useful for disabling the interrupt check completely. As with 
ON ERROR, FOR loops and GOSUBs remain active after an ON 
BREAK, so caution should be exercised when attempting to restart a 
program. 
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CHAPTER 9 


NUMERIC, STRING AND USER DEFINED 
FUNCTIONS AND PROCEDURES 


Functions perform a series of numeric or string operations on the specified arguments, 
returning a result as their value. BASIC provides numeric functions, string functions, 
and functions that are defined by the user. This Chapter describes the majority of 
these. 


Some specialised functions involved in Input/Output and interfacing with Assembly 
Language programs are described in the appropriate sections. 


NUMERIC FUNCTIONS 


BASIC provides numeric functions to perform standard trigonometric and algebraic 
operations. These numeric functions are: 


SIN Return the sine of an angle 

COS Return the cosine of an angle 

TAN Return the tangent of an angle 
ATN Return the arctangent of a number 
ЗОВ Return square root of a number 
EXP | Return the constant e raised to a power 
LOG Return natural logarithm 

INT Return integral part of a number 
ABS Return absolute value of a number 
SGN р Return sign of a number 

RND Return a pseudo-random number 


SIN 10 LET В=$ТМСА) 

SIN returns the sine of the angle A, expressed in radians. 
COS 10 LET B=COSCA) 

COS returns the cosine of the angle A, expressed in radians. 
TAN 10 LET В=ТАМСА) 


TAN returns the tangent of the angle A, expressed in radians. 
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ATN 10 LET P=4*ATN(1) ы 


АТМ returns the arctangent, the angle (іп radians in the range —pi/2 to 
pi/2) whose tangent is the argument of the function. The example 
assigns the value of pi to P. 


=" 


It is worth observing that degrees can be converted to radians by the 
relationship: 


radians = (degrees/180) * pi 
as in the statements: ‘ide 


10 LET P=4*ATN(1) 
20 LET R=(D/180)*P 


which assign the radian equivalent of D degrees to R. 


SQR 10 LET B-SQR(A) _ 
SQR returns the square root of its argument, which may not be less 
than zero. 

EXP 10 LET В=ЕХРСА) ~ 


EXP returns the algebraic constant e (about 2.718282) raised to the 
power of its argument. If the argument is equal to 1.0, the value of e is 
assigned to B. 


7 s 


LOG 10 LET B=LOGCA) 


LOG returns the natural logarithm (log to the base e) of its argument, 
which must be greater than zero. 


и, 


INT 10 LET A=INT(5.25) 10 LET B=INT(-3.4) 


The INT function returns the greatest integer that is less than or equal 

tothe value of its argument. The first example assigns 5 to A. Note that — 
when the argument is negative, INT returns a number whose absolute 

value is greater than or equal to that of its argument. The second 

example assigns —4 to B. 


А common use of the INT function is to round numbers to the nearest 
integer. Thus: 


uiis. 


9.2 


FUNCTIONS AND PROCEDURES 


10 PRINT ІМТ (34.67 + 0.5) 
20 PRINT INT(-5.1 + 0.5) 


prints the rounded values 35 and —5. 


A general point to be made here is that small errors are often made in floating point 
calculations. This may mean that the result of a calculation may be (say) 0.99999... 
instead of the expected 1.00000..., and if this quantity is INTed, the result will 
be 0 instead of 1. This phenomenon may be the cause of some spurious results (see 
Chapter 3). 


ABS 10 LET В=АВ$ (4) 20 LET C=ABS(-4) 


The ABS function returns the absolute value of its argument. If the 
argument is positive, ABS returns its value. If the argument is 
negative, its value multiplied by —1 is returned. The examples assign 4 
to both B and C. 


SGN 10 LET А-56МС-4) 


The SGN function returns 1 if its argument is greater than zero, 0 if it is 
zero, and — 1 if it is negative. The example assigns —1 to A. 


RND 20 LET B=RND(1) 


ВМО returns a pseudo-random number in the range 0 to 1. If the 
argument is greater than zero, the value returned is the next in the 
pseudo-random sequence. If zero, the value returned is the same as was 
returned by the previous call, and if the argument is negative, the 
random number generator is reseeded. 


For example: 
10 LET A=RND(-1) 
20 LET B=RND(1) 
30 LET C=RND (0) 


assigns a number between 0 and 1 to A, arandom number to B, and the 
same random number to C. 


Differing negative values of the argument may initialize RND 
differently so if a predictable sequence is desired, the same value should 
be used each time. Differing positive values have no effect. 


Note that random numbers can be forced into the range A to B by the 
formula (B—A) * RND(1) + A. 


Some sample statements follow, illustrating the use of the RND 
function: 
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Example 1. 


шая 


To obtain a random number іп the range 10 to 15, we can use: 


LET 0<(15-10) жкмор (1) + 10 


Example 2. 


To obtain an integer in Ше range 10 to 14, the INT function 
can be used: 


LET Е=ІМТ (5 ВМР (1) + 10) 
The same sequence of random numbers is generated each time the 


program is RUN. The RANDOMIZE command described in Chapter 
10 resets RND to a truly random point in its sequence. m 
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STRING FUNCTIONS 


BASIC provides string functions that allow certain string to numeric conversions and 
permit examination and modification of strings. String functions that return a string 
have a dollar sign ($) at the end of their names. String functions that return a number 
do not have a dollar sign. 


General information about strings, string variables and string arrays is contained in 
Chapter 3. Strings may be concatenated (combined) by the addition operator. Thus: 


10 LET A$="12" 
20 LET В$="345" 
30 LET C$=A$+B$ 


assigns 712345" to C$. 


The string functions are: 


ASC Convert character to ASCII code 
CHR$ Convert ASCII code to character 
VAL Convert string to number 
STR$ Convert number to string (decimal) 
LEN Return length of string 

FN RIGHT$ Copy a segment from a string 
ГЕЕТ$ Copy а segment from а string 

| MID$ Copy a segment from a string 

— НЕХ$ Convert to hexadecimal 


ASC 20 LET B=ASCC"A') 


ASC returns the number which is the ASCII equivalent of the first 
character of the string argument. For example: 


10 LET А$="АВС"' 
20 LET В=АЗССАФ) 


assigns 65 to B, 65 being the decimal ASCII code for letter A. The 
example in the heading does likewise. 
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CHR$ ТО PRINT CHR$(65) 


CHR$ returns the ASCII character whose numeric code is the 
argument. The value of the argument must Пе in the range 0 to 255. The 
example prints the letter A on the screen. CH R$ is the inverse of ASC. 


VAL 20 LET B-VAL('4.5'') 


VAL returns the number represented by the string argument. The 
string should contain a numeric constant in any of the standard forms 
described in Chapter 3. Note however that hexadecimal digits in the 
range A-F must be in upper case. For example: 


10 LET A$="4.5" 
20 LET B-VAL(A$) 


assigns 4.5 to B, as does the example in the heading. 


The conversion is terminated by a character which does not form part 
of a valid number. An error does not occur if no numeric characters are 
encountered. Thus УА“ 1.2.3”) returns 1.2 and V AL(“ АВС”) returns 
zero. If the string is the null string, VAL returns zero. 


STR$ 20 LET B$-STR$(4.5) 


STR$ returns a string representing the value of the argument, 
preceded by a single leading space if positive, or a minus sign if 
negative. The example assigns the 4 character string ' 4.5" to B$. 
STR$ is the inverse of VAL. 


LEN 20 LET BzLEN("ABC'') 


LEN returns the length of the string argument string in bytes. If string 
is the null string, LEN returns zero. The example assigns 3 to B. 


ГЕЕТ$ 20 LET B$-LEFT$(A$,2) 
RIGHTS 30 LET C$-RIGHT$(A$,2) 


These two functions return substrings consisting of a number of 
characters taken from the left and right-hand ends of their string 
arguments, respectively. For example: 


10 LET А5="АВСРЕ" 
20 LET BS=LEFTSCA$, 2) 
50 LET C$-RIGHT$(AS$,2) 


assigns “АВ” to B$ and "DE" to C$. 
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The value of the second argument is the number of characters to 
extract. If it evaluates to zero or the string is the null string, then the 
null string is returned. If it is greater than the length of the string, the 
whole string is returned. 


MID$ 20 LET B$zMIDS$(AS$,2,3) 


MID$ returns a substring extracted from the string argument, 
starting at the character position specified by the second argument and 
consisting of the number of characters specified by the third argument. 
For example: 


10 LET AS$=""ABCDE" | 
20 LET В$=М10$(А$,2,3) 


assigns “BCD” to B$. 


If the second argument is greater than the length of the string, the null 
string is returned. If the third argument is omitted, all the characters 
from the position specified by the second argument to the end are 
returned. If the second and third arguments together are greater than 
the length of the string, MID$ will return a string obtained by starting 
at the second argument and going to the end. 
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HEX$ LET G$=HEX$(12345) 


OOM i, 


HEX$ converts its numeric argument into a four character string 


containing the number expressed in hexadecimal. The example assigns 
“3039” to G$ 
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USER-DEFINED FUNCTIONS 


The keyword DEF together with the special function prefix FN allows the user to 
define functions which can, for example, replace an identical sequence of operations 
that occur in several places in a program. Function names consist of the letters FN, 
followed by a valid variable name, e.g. FNA, FNC7. 


In Extended Basic Version 5 a function must be defined before it is referenced, and the 
form of a function definition is: 


DEF FNvnvn (arg) = expr 


where vnvn is a valid numeric variable name which becomes part of the function name, 
arg is a valid numeric variable name which is used as a dummy argument, and expr is a 
numeric expression which is to be evaluated each time the function is called. 


As its name suggests, a single-line function cannot extend beyond the end of one 
program line. 


Once a function has been defined, it may be referenced ("called") by the use, in any 
expression, of: 


FNnof (vne) 


where FNnof is the name of the function to be called and vne is a valid numeric 
expression. Expression vne is evaluated and its value replaces the dummy argument 
in the function definition. Next, the expression in the function definition is evaluated, 
probably making use of the value of the dummy argument, and the resulting value 
replaces the function name in the calling statement. 


For example: 


ТО DEF FNS(X)=X*xX 
20 LET A=3 

30 LET В=ЕМ$ (А) 
40 LET С=ЕМ$ (4) 


assigns 9 to В and 16 to С. Function FNS returns the square of its argument. 


Note that the dummy argument X in the above example is quite distinct from the 
variable X which might be used elsewhere in the program. A dummy argument should 
be considered as a place marker which indicates to BASIC merely where to insert the 
corresponding argument from the function call. 


Function definitions can be placed anywhere in a program but in Extended BASIC 
version 5 the program flow of execution must pass through a function definition before 
it can be called. For this reason it is usual to put definitions at the beginning of a 
program. 
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A function cannot be defined in immediate mode. A function may be redefined as many 
times as desired: the definition used is the one through which program flow most 
recently passed. If program flow has not passed through a definition (possible in 
Extended BASIC Version 6) and there is more than one function with the same name, 
then the definition used is the one at the highest program line number. This also 
applies to multiline functions and procedures (see below). 


If the definition of a function contains an error that will cause, for example, a “Syntax 
error at line nnn" message at run time, the line number in the message refers to the line 
in which the function was called, not the line that is in error. 
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CHAPTER 10 
MISCELLANEOUS COMMANDS 


This chapter discusses all the commands which find no logical place elsewhere in the 
manual. 


STOP STOP 


STOP causes the message: 


Interrupted 


to be issued, and program execution stops. Program execution may be 
N resumed at the statement after the STOP command with CONT, 
| provided that the program is not modified. 


END END 


Program execution is halted. Unlike many other BASICs, there can be 
any number of END commands, including попе at all, and they can be 
- placed anywhere in the program. However, good programming 
po practice suggests that if an END statement is present, it should be the 
last statement. Program execution may be resumed at the statement 
after the END statement, if any, with the CONT command. 


BYE BYE 


BYE closes all files and exits BASIC, returning to the operating 


"m system. This is the best way to leave BASIC if the program involved 
file handling, although for most purposes <CTRL/C> is probably 
easier. 

REM 100 REM THIS IS A REMARK 


REM introduces a remark or comment into a program. It has no effect 
on the program, except to make it bigger and slower, but a human 
reader may find a commented program easier to read. The whole of the 
line following the REM is devoted to the remark, including any colons. 
This means that a REM statement must be the last or only statement 
on a line. 
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LLVAR 


TRACE 


LVAR LVAR #10 


LVAR lists the values of all the simple variables, on the console in the 
first example, to the output file in the second (see Chapter 12). The 
variables are output one per line. Array variables are not listed. The 
LVAR command is most useful for debugging purposes. 


LVAR may be included within a program. 


LLVAR 


LLVAR is the same as LVAR, except that the output goes to the 
printer device. 


On a network, terminate the output with CLOSE #2 (See Chapter 12) 


TRACE O TRACE #10,1 


The TRACE command enables or disables program tracing on the 
specified channel, (the console and the output file in the two examples.) 
While tracing is enabled, the line number of any executed statement is 
output enclosed in angle brackets. 


For example, the program: 
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10 TRACE 1 
20 REM TRACING NOW 


30 TRACE 0 
40 REM NOT TRACING 


produces: 


<20><30> 
Ready: 


In the TRACE command, the last or only argument is evaluated. If it 
is zero, then tracing is disabled. Otherwise it is enabled. 


Allowable channels are 0 (console), 2 (printer) and any serial file 
output channel. 


LTRACE 1 


Á 


LTRACE is the same as TRACE, except that the output goes to the 
printer device. The same effect is acheived by TRACE #2, 1. 


On a network, terminate the output with CLOSE #2 (See Chapter 12). 


RANDOMIZE 100 RANDOMIZE 


As mentioned in Chapter 9, the RND function returns a random 
number. However, the same sequence of random numbers is returned 
each time the program is RUN. The RANDOMIZE command sets 
the random number generator to a random point in its sequence. 
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Escape sequences provide a means of controlling certain system 
parameters from within a program. They are mentioned here merely 
to draw attention to their existence. See Appendix F for details. 
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CHAPTER 11 
LOW RESOLUTION GRAPHICS 


This chapter introduces the low resolution graphics facilities on all 380Z and 480Z 
systems. (High resolution graphics facilities, for which special hardware options must 
be fitted, are described in chapters 15, 16 and 17.) 


The computer screen consists of 24 lines of 40 or 80 characters each, depending on the 
hardware configuration and the mode of operation that has been selected. Normally, 
the whole of this is used for scrolling. However, Extended BASIC has a special 
graphics mode whereby the bottom four lines only are used for scrolling, and the top 20 
lines can be used for graphics only. 


Each character cell consists of six dots arranged in a rectangle three high by two wide, 
with each dot capable of being set on or off individually. The “оп” dots of a particular 
character can be either grey or white. However, all “оп” dots within one character cell 
must be of the same shade. 


The top 20 lines of the screen can thus be treated as an array of dots 60 high by 80 or 
160 wide, with each dot being either off, grey, or white. The bottom four lines can be 
used for scrolling or graphics, and can be treated as an array 12 high by 80 or 160 wide. 


GRAPH GRAPH GRAPH 0 GRAPH 1 


The effect of the GRAPH command depends on the value of the 
expression following it. This expression can take the values 0, 1, 2, or 3, or 
it can be omitted. If the argument is negative or greater than 3 the error 
message: 


Illegal function 
is produced and program execution halts. 


GRAPH 1, ог GRAPH on its own, sets the scroller to use only the bottom 
four lines of the screen and clears the top 20 lines, in preparation for 
graphics. GRAPH 0, or TEXT (see below), restores the full screen scroller. 


With the 3807, GRAPH 2 and GRAPH 3 are provided to maintain 
compatibility with previous versions. GRAPH 2 “opens” the screen so 
that PEEK and POKE work. However, it also blanks the screen, resulting 
at best in an annoying flicker at the top of the screen. GRAPH 3 restores 
the screen to its normal state. GRAPH 2 and GRAPH 3 will not work 
when in 80-character mode. With the 480Z, GRAPH 2 results in a slight 
pause but beyond this neither GRAPH 2 or GRAPH 3 have any effect. 
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TEXT 


PLOT 


TEXT 


TEXT restores the scroller to use all 24 lines on the screen. It is equivalent 
to the GRAPH 0 command described above, although it is somewhat 
faster and leads to clearer programs. 


PLOT 10,12,2 PLOT 18,21,"HELLO, WORLD", 2 


The PLOT command is used for plotting points, characters, and strings on 
the screen, anywhere in the top 20 lines. The first two arguments to PLOT 
are the x and y coordinates of the item to be plotted, where (0,0) is at the 
bottom left of the screen and (79,59 or 159, 59) is at the top right. However, 
no error is caused when the plotted point lies off the screen, provided that 
both x and y are less than 65535 and greater than —65536. Values of x and 
y outside this range cause the error message: 


Illegal function А 


and program execution stops. Values of the y coordinate in the range —12 
to —1 signify points in the bottom four lines of the screen normally used 
for scrolling. 


The third argument to PLOT, if present, is the item to be plotted. If it isa 
string, then the string is plotted character by character across the screen. 
Thus: 


PLOT 28,27,"HI THERE" 


would result in the message “НІ THERE" appearing in the middle of the 
Screen. 


If the third argument to PLOT is a number or numeric expression, the 
item plotted is either a point or a character. Values 0, 1 and 2 signify point 
plotting; the specified point becomes off, grey, or white respectively. 
Values in the range 3 to 127 result in the specified ASCII character being 
plotted, while those in the range 128 to 255 display a “graphics character". 


It is important to appreciate the difference between plotting a point (third 
argument value 0, 1 or 2), which will appear at exactly the specified screen 
coordinates, and plotting a character (third argument value 3 to 255), 
which is of size 2 points wide by 3 points high and will appear in the same 
place on the screen if the given coordinates specify any one of the six 
points that it occupies. 


The following program shows the character set. Each character occupies 
one character cell, two points wide by three high, and for clarity in this 
display alternate cells (both horizontally and vertically) are left blank: 
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100 GRAPH: PRINT: PRINT: PRINT: TEXT о 
120 N20: MX=127: Y=51 

130 Y=Y-6 

150 FOR X=14 TO 74 STEP 4 

160 PLOT X,Y,N 

170 N=N+1 

180 NEXT X 

190 IF N<=MX GOTO 130 

260 PLOT 0,-9,"Press <H> for others," 
265 PLOT 42,-9," or «RETURN? to end" 
270 R$=GET$() 

280 IF В$<>"Н" AND R$<>"h" THEN END 
290 IF MX>127 GOTO 100 

300 N=128: MX=255: Y=51 

310 GOTO 130 


The above simple version of the program will display the available 
characters, but the addition of the following lines to that program (pay 
- particular attention to the line numbers) will considerably improve the 
appearance of the display as well as affording further examples of the use 
of the PLOT command: 


110 PLOT 14,5%,"0 2 4 6 8 10 12 14" 
140 NS=LEFTS(C" " 4-LENCSTRS(N)))+STRSON) 
145 PLOT O,Y,N$ 

200 FOR Х=0 TO 78 STEP 2 

205 PLOT X,51,31: PLOT X,-3,31: NEXT X 

210 FOR Y=-3 TO 51 STEP 3 

220 PLOT 0,Y,25: PLOT 8,Y,25 

225 PLOT 78,Y,25: NEXT Y 

230 PLOT 0,51,18: PLOT 8,51,16: PLOT 78,51,17 
240 PLOT 0,-3,15: PLOT 8,-3,19: PLOT 78,-3,20 
250 PLOT 6,-6,"Low-resolution graphics " 

255 PLOT 54,-6,'"characters" 


If the third argument to PLOT is omitted, BASIC uses the last specified 
value, or 0 initially. 

Оп а 3807; the fourth argument to PLOT sets up attributes. Attributes are 
available only on an 80-character board, and on a 40-character board the 
attribute argument has no effect. On an 80-character board, the attribute 
argument is treated as an 8-bit number, of which the least significant four 
bits control the available attributes. These are: 


Bit Decimal value Effect 


0: 1 Alternate ROM 
1 : 2 Underline 

2: й Dim character 
5 š 8 Reverse video 


Thus, by adding the decimal values, a value for the attribute argument т 
the range 0 to 15 can be chosen to set any required combination of 
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LINE 


attributes. For example, a value of 10 will select underlining and reverse 
video. A value outside the range 0 to 255 will result in the error message: 


"Illegal function". 


If the attributes are omitted, they default to zero (no attributes), unless 
the third argument is also omitted, in which case they default to the last 
attributes specified. The default attributes are initially zero. 


The fourth argument is not used on a 480Z because the 480Z has no 
attribute bits available, and is provided only to maintain a degree of 
compatibility. Although the attributes argument has no effect it must 
still, if present, lie in the range 0 to 255. 


As a simple example, the following program plots a sine wave on the 
screen, together with a heading. On a 380Z with the 80-character option its 
heading will be in dim reverse video: 


10 GRAPH 

20 FOR Х=0 TO 79 

30 PLOT X, 25*SIN(X/10)+26, 2 
40 NEXT X 

50 PLOT 30, 0, "SINE WAVE", 12 
60 PLOT -1,0,0,0 

70 TEXT 


Line 60 in included merely to reset the attributes to their normal states. If 
this is not done then subsequent plotting, which will probably use the 
default attribute values of “those last set", may well give unexpected 
results. 


LINE 10,20,2 LINE X,Y 


LINE draws a straight line from the coordinates of the last PLOT 
command or the endpoint of the last LINE command to the specified 
position. The x and y coordinates can take the same range of values as for 
PLOT. The line will be black, grey, or white if the third argument, which 
defaults to the last value given, is respectively 0, 1, or 2. Larger values will 
cause the line to be drawn in characters, as is the case with PLOT. Again 
as with PLOT, an attributes argument can be specified but it will only 
have an effect with a 380Z with an 80-character board. This effect will be 
the same as with PLOT. For example, the following program draws a box 
in the middle of the screen, in black, grey, and white in sequence: 


10 GRAPH 

20 FOR 1=0 TO 2 
30 PLOT 10,10,I 
40 LINE 10,49 
50 LINE 69,49 
60 LINE 69,10 
70 LINE 10,10 
80 NEXT I 

90 GOTO 20 
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LET A=POINT (30,30) 


POINT returns the intensity at the specified coordinates on the screen. If 


the character at the specified location is a graphics character (і.е. it is a 
pattern of dots), POINT will return 0, 1, or 2 depending whether the point 
is off, grey, or white. If the point contains an ASCII character, that 
character will be returned. 


А=РОТМТ$ (30, 30) 


POINTS will return the value of the character stored at the specified point 
on the screen. If the point is not a graphics character, POINTS will return 
the same value as POINT. A graphics character will be returned as a 
number in the range 128 to 255. 


A=ATTRIB(X,Y) 
The ATTRIB function returns the attributes at the specified location. On 
an 80-character 3807, the number returned will lie in the range 0 to 15. Іпа 


40-character 3807, or in a 4807, the result will always be zero. See the 
PLOT command for the meaning of the attribute bits. 
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As an example of the use of some of the above facilities (and some to be described in 
Chapter 12), the following program will save the contents of the screen on file, and then 
redisplay it. This scheme allows a library of pictures to be maintained on file and be 
displayed as required: 


CLEAR 1500 

CREATE #10, "РТСТИВЕ" 
QUOTE #10,0 

FOR 1=0 TO 19 

LET A$z'"" 

FOR Ј=0 TO 39 

LET А$=А$+СНВ$ (РОТМТ$ (/*2, 1*3) ) 
NEXT J 

PRINT #10,A$ 

NEXT I 

CLOSE #10 

GRAPH 

OPEN #10,"PICTURE" 
FOR 1=0 TO 19 

INPUT LINE #10,A$ 
PLOT 0,1*3,A$ 

NEXT I 

CLOSE INPUT #10 

TEXT 


qu o 


; эт, 
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CHAPTER 12 


FILE HANDLING AND EXTENDED I/O 


As well as both taking input from the keyboard or reading it from DATA statements 
and sending output to the screen or printer, in Extended BASIC it is possible to 
transfer information to and from files stored on disc. 


Extended BASIC Version 5 allows only one input and one output file to be selected 
concurrently. Multiple files may be processed in the same program by selecting them 
one by one, in turn. 


In Extended BASIC Version 5, these data files are organized and processed 
sequentially; you must read the entire file to read the last item of data it contains 


You use sequential files in the same way that you use terminal input and output. A 
modified form of the INPUT command takes its input from file, while file output is via 
a modified PRINT statement. Sequential files allow you to manipulate larger amounts 
of data in a shorter time than is possible with terminal I/O to the keyboard and screen. 


This Chapter describes all of the commands which are used in conjunction with 
sequential data files. These are mostly commands which we have already met, chiefly 
in Chapter 7, extended to redirect their input or output to the file channel. A channel 
specification consists of the hash or sharp character (#) followed by the channel 
number. For input commands, the channel number can be 0, to indicate the keyboard, 
or 10, to indicate the file. For output, possible channels are 0, the screen, 2, to indicate 
the printer, and 10, to indicate the file. The channel specification follows immediately 
after the keyword, for example: 


PRINT #10,A,B,C 


and is separated from any further items by a comma. Commands that accept channel 
specifications are described below. In all except OPEN, CREATE and CLOSE, the 
channel specification defaults to zero. Many of the commands can alternatively be 
preceded by L to indicate the printer device. Such commands must not be followed by a 
channel specification starting with #. 
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Some of the commands require a file specification, which may be supplied within 
quotation marks or in a string variable or expression. File specifications were 
described in Chapter 4. You may also use the file specifications “СОМ№:”, *LST:", 
"RDR:', or "PUN:" to connect the file channel to the keyboard or screen, printer, 
reader, or punch device, respectively. These are useful for testing, and RDR: is useful 
for transferring programs between computers. 


Also described in this Chapter are the single-character commands PUT and GET, 
which allow I/O to either file or console on a byte-at-a-time basis. 


GENERAL FILE-HANDLING COMMANDS 


This section discusses the commands which perform general housekeeping functions, 
such as opening and closing files. They all use channel 10, the file channel. The 
RENAME and ERASE commands described in Chapter 4 also perform useful file- 
handling functions. 


CLOSE CLOSE #10 CLOSE #2 


The CLOSE command closes the output file. The output buffer is 
emptied and the disc directory is updated. If this step is omitted, the 
contents of the file will be lost. The BYE command described in 
Chapter 10 and the CREATE command described below both 
automatically close the output file if necessary. 


CLOSE without a channel number specified closes all output files. If a 
channel number is specified then only the channel specified is closed. 


Any output to a printer on a network (e.g. LLIST, LPRINT, LLVAR, 
LTRACE, PRINT #2, PUT #2, DIR #2) will create a file on the 
network server which will be subsequently printed. The file will not be 
printed unless it is closed — CLOSE #2 performs this function. 


CLOSE INPUT CLOSE INPUT #10 


The CLOSE INPUT command closes the file from which reading has 
taken place (namely the input file — the file opened by the OPEN 
command). 


CLOSE INPUT without a channel number specified closes all input 
files. If a channel number is specified then only the specified channel is 
closed. 


On a network, input files MUST be closed after use. Failure to do so 
may have severe repercussions on other network users. 
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CREATE #10,""RESULTS" CREATE #10,Q$ 


CREATE creates the specified file and makes it ready for output. If the 
file already exists, the message: 


File exists--replace (Y/N): 


is produced. If Y or y is typed at the console, the old copy of the file is 
erased and the new one created. Otherwise, the program halts. If the 
disc directory is full, the message: 


Directory full 


is produced. You must erase a file or change the disc before retrying. 
Remember that the RESET command must be issued after changing a 
disc (see Chapter 4). 


LET AZLOOKUP("DATA'') 


LOOKUP is a function which allows a program to determine whether a 
file exists. This is often useful when a program wishes to OPEN a file, 
as an attempt to OPEN a non-existent file causes an error. The 
following program fragment is an example: 


10 INPUT "FILE МАМЕ"; A$ 

20 IF ГООКУР (АФ) <>0 THEN 50 

50 PRINT "THAT'S NO GOOD - TRY AGAIN" 
40 GOTO 10 

50 OPEN #10,А$ 


LOOKUP returns —1 if the file exists, and 0 if either it does not exist or 
the file specification is malformed. 


OPEN #10,''NAMES" OPEN #10,Е$ 
OPEN opens a data file for reading. The specified file is opened and the 
file system is initialized. If an attempt is made to OPEN a non-existent 
file, the error message: 

File not found 
is produced and the program execution stops. 
N.B. Always use the CLOSE INPUT command (described above) after 


you have finished reading an input file. 
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INPUT AND OUTPUT COMMANDS 


The commands so far introduced merely set up files; they cause no input or output. 
This section describes the ways in which characters can be read from or written to files. 


INPUT 


INPUT LINE 


12.4 


INPUT #10,A,B 


INPUT from a file is entirely analogous to INPUT from the console. 
When an INPUT # command is executed, a line of data is read from the 
file. This line of text is scanned for data items which are then assigned 
to the specified variables in exactly the same way as described in 
Chapter 7. If there are two or more data items per line, they must be 
separated by commas. 


Lines of data in a file will be in the correct format for an INPUT # 
command if the program that wrote them made correct use of the 
QUOTE command (see below). 
No question mark prompts are produced even if insufficient items are 
given — under these circumstances BASIC merely reads another line. 
The form: 

INPUT #10, "PROMPT''; АЗ 


is not allowed. 


Attempting to read a file before executing an OPEN command results 
in the error message: 


No input file 


and attempting to read beyond the last line of a file results in the error 
message: 


Illegal EOF 


INPUT LINE #10,А$ 
The INPUT LINE #10 command is exactly the same as the normal 
INPUT LINE command, except that the data is taken from file and not 
from the console. If no file is OPEN, the error message: 


No input file 


is produced. Reaching the end of the file without an ON EOF results in 
the error message: 


Illegal EOF 


шас 


СЕТ 


СЕТ$ 
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10 LET A=GET(123) 
20 LET В=бЕТ (#10) 30 LET C=GET() 


GET is a single-character input routine, which returns the ASCII value 
of the next character from the selected input stream. Console input 
may optionally be timed, allowing interactive response without halting 
the program. 


The function may be provided with zero, one, or two arguments. If 
there are no arguments, GET waits indefinitely for a single character to 
be input at the keyboard. If there is one argument, it can be either a 
channel specification, indicated by #, or a delay, measured in 
centiseconds (hundredths of a second). Thus, СЕТ(500) waits for 5 
seconds for a response from the console, and GE'T(#10) gets a character 
from the input file. If two arguments are present, they must be a 
channel specification after # and a delay, and the channel must specify 
the console. In each case, if no character is available by the end of the 
specified delay period, 0 is returned. 


If the specified delay is —1, GET waits for whatever time was left over 
from the last GET. GET(—2) returns the remaining delay. 


A few examples should clarify all this: 


GET() Read next character from keyboard 

GET(100) Wait 1 second for a character 

СЕТ СНО) Read next character from keyboard 

GETC#0,100) Wait 1 second for a character 

GET(#10) Read next character from file 

GET(-1) Allow remaining time 

GET(-2) Return remaining time 

СЕТ (0) Test keyboard, return character or zero 
10 LET А$=6ЕТ$ (#10) 20 LET BS=GET$(123) 


GETS returns the next sequential byte as a string of length zero or one. 
It is similar to CHR$(GET(...)), except that GET$ cannot return the 
amount of time remaining by GET$(—2). Also, if the specified time 
delay is exhausted, СЕТ returns the null string (as opposed to a string 
with a NUL in it). 


With both GET and СЕТ$, no special note is taken of any control character, including 
<CTRL/C> and <CTRL/Z>. This means that <CTRL/Z> is not recognised as a 
console interrupt during a GET from the console, or as end-of-file from the file channel. 
Continued GETting from file will eventually result in EOF only when the physical 
end-of-file is reached. If <CTRL/F> is typed while GET is waiting for a character, the 
value 6 is returned and the Front Panel is not entered. 


Further examples of programs using GET are given at the end of this chapter. 
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PRINT 


PUT 
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PRINT #10,A,B 


This form of the PRINT command is the same as the normal form 
introduced in Chapter 7, except that the characters are sent to the file. 


If no CREATE command has been executed for the specified channel, 
then the error message: 


No output file 
is generated. The messages: 


No disc space 
Directory full 
Write error 


may also be produced. ‘‘Write error" may be caused by the disc being 
full or by a hardware malfunction, or, on a network, it may also indicate 
no disc present in the drive. “Мо disc space" means the disc is full. 


PUT 15,"HI THERE" PUT #10,A$ 


PUT outputs the elements of the list of arguments to the selected 
channel. The list consists of a sequence of numeric or string 
expressions, separated by commas. A numeric expression represents 
the ASCII value of a single byte; a string is output character by 
character. The width, null and quote options which govern the 
behaviour of PRINT do not apply to PUT. Similarly it has no effect on 
the position of the print head that is returned by POS and used by 
TAB. Examples of PUT are: 


PUT 12 Clear the screen 
РОТ #10, "НЕО" Output HELLO to file 


As with all commands which output to file, the following error 
messages are possible: 


No output file 
No disc space 

Directory full 
Write error 


Further examples of PUT will be found at the end of this chapter. 
PUT сап be used to output “escape sequences” of characters, which 


can be used to control certain system parameters from within a 
progam, and are described in Appendix F. 


————————————————————————————— | 


DIR 
LIST 
LVAR 
TRACE 


FILE HANDLING 


DIR #10 DIR #2,"х,х" 
LIST #10,25-99 

LVAR #10 LVAR #2 
TRACE #10,1 TRACE #2,0 


These commands behave exactly as described in Chapters 4, for DIR 
and LIST, and 10, for LVAR and TRACE, except that their output is 
sent to file (#10) or printer (#2). An attempt to output toa file for which 
no CREATE command has been executed will result in the error 
message: 


No output file 


INPUT CONTROL COMMANDS 


This section describes the commands available for controlling input files. 


ON EOF 


EOF 


ON EOF GOTO 1000 ON EOF 


The ON EOF command controls the behaviour of Extended BASIC 
when an attempt is made to read past the end of file with GET, INPUT, 
or INPUT LINE. Normally, the message: 


Illegal EOF 


is produced. However, after an ON EOF GOTO... command, control is 
transferred to the specified line number. For example, the following 
program prints out a file on the console: 


10 OPEN #10, "ОАТА" 
20 ON EOF GOTO 60 
30 INPUT LINE #10,А$ 
40 PRINT A$ 


50 GOTO 30 
60 CLOSE INPUT #10 
70 END 


The command ON EOF restores BASIC to its original state whereby 
end-of-file causes an error. 

EOF 

The EOF command causes BASIC to react as if the end-of-file had been 


reached. This will either cause transfer of control to a line number 
specified by an ON EOF command, or cause an error message. 
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PUT CONTROL COMMANDS 


This section describes the commands which control the format of output. 


NULL 


POS 


QUOTE 
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NULL #10,3,0 


This command is the same as described in Chapter 7, except that a 
channel specification can be given. The example causes each 
CARRIAGE ВЕТОВМЛАМЕ FEED sent to the file to be followed by 
three ASCII NULs. 


LET А=РО$ (10) LET В=РО$ (2) 


POS returns the position of the “printhead” of the channel specified by 
the argument. The examples assign the cursor position of the file to A 
and the printer head position to B. POS is more fully described in 
Chapter 7. 


QUOTE #10,0 QUOTE #0,34 


This command is used to change the format of output generated by 
PRINT commands on a particular channel. 


The first argument is the channel number and the second argument is 
usually 0 or 34. If the second argument is 34, then all strings output by 
PRINT commands on the specified channel are enclosed in double 
quotes — the character which has an ASCII code of 34. Also, commas 
separating multiple items on a PRINT statement are output literally 
instead of causing columnar output. For example: 


90 QUOTE #0, 34 
100 PRINT АЗ,В,С 


might produce the output: 
"НІ". `& зоб 


If the second argument is 0, then output from PRINT statements will 
revert back to the normal (default) format. The second argument may 
in fact be any ASCII character code, although ASCII code 34 (double 
quote character) is the most commonly used. This “quote character” is 
the one used to enclose all strings output by a PRINT command on the 
specified channel. 


This command is particularly useful if output generated by PRINT 
commands is later to be read in by an INPUT command. 


The QUOTE command must be executed after the CREATE 
command for that file and before any PRINT # commands that are to 
have their output formatted in this way. 
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WIDTH WIDTH #10,132 


The WIDTH command is the same as described in Chapter 7, except 
that a channel specification can be given. The example sets the logical 
width of the output file to 132. 


EXAMPLES 1-5 


nm 
| These programs are intended to be short examples to perform simple functions on 
sequential data files. They are far from optimal in many respects, data validation in 
particular having been largely omitted for clarity. We strongly recommend that you 
Г ань try out these examples at the computer. 
A Example 1 
The first example creates a data file with an arbitrary number of records, each of 
which contains a string and a number. Input is terminated by typing the line 
m END,O. 


10 CLEAR 200 

20 INPUT "OUTPUT FILE МАМЕ" ; АФ 

30 CREATE #10,А$ 

40 PRINT "INPUT THE DATA, ENDING WITH 'END,O' 
50 QUOTE #10,34 

60 INPUT A$,A 

70 ТЕ AS="END" THEN 100 

80 PRINT #10,A$,A 


90 GOTO 60 
i 100 CLOSE #10 
N 110 END 
RUN 


OUTPUT FILE NAME? STOCK 

INPUT THE DATA, ENDING WITH 'END,O' 
? PENCILS, 17 

? BALLPOINTS,23 

? PAPER,9 

2 ЗТАРЬЕ$ , 10000 

? 

? 


PAPER CLIPS,2000 
END ,O 


Ready: 
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Example 2 


The next example prints out a data file on to the console, checking that the file 
exists first. The file must consist of a number of records each containing one string 
and one number. The file generated in Example 1 meets this requirement. 


10 CLEAR 200 

20 INPUT "FILE МАМЕ"; A$ 

50 IF LOOKUP(A$)=0 THEN 20 
40 OPEN #10,A$ 

50 ON EOF GOTO 90 

60 INPUT #10,A$,A 

70 PRINT A$,A 


80 GOTO 60 
90 CLOSE INPUT #10 
100 END 
RUN 
FILE NAME? STOCK 
PENCILS 17 
BALLPOINTS 23 
PAPER 9 
STAPLES 10000 
PAPER CLIPS 2000 
Ready: 

Example 3 


The next example copies a file, of any format, to another. It performs no error 
checking at all. Note the use of INPUT LINE command to ensure that the input file 
is copied without modification. 


10 CLEAR 200 

20 INPUT "FILE МАМЕ"; A$ 
50 INPUT "OUTPUT FILE МАМЕ"; ВФ 
40 OPEN 810,А5 

50 CREATE #10,B$ 

60 ON EOF GOTO 100 

70 INPUT LINE #10,A$ 

80 PRINT #10,А$ 

90 GOTO 70 

100 CLOSE #10 
110 CLOSE INPUT #10 
120 END 


RUN 
FILE NAME? STOCK 
OUTPUT FILE NAME? NEWSTOCK 


Ready: 
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Example 4 


The next example allows the user to append information on to the end of an existing 
file, or to create a completely new file. It does this by checking first to see whether 
the file exists (line 30). If it does, it is renamed to TEMP and copied. Otherwise, the 
file is simply created. New records can then be added, each record consisting of a 
string and a number. The input phase is ended by typing END,0 in response to the 
prompt. 


10 CLEAR 200 

20 INPUT "FILE FOR APPENDING"; AS 
30 ТЕ LOOKUPCA$)=0 THEN 140 
40 RENAME '"TEMP'",A$ 

50 OPEN #10, "ТЕМР" 

60 CREATE #10,A$ 

70 QUOTE #10,34 

80 ON EOF GOTO 120 

90 INPUT #10,B$,A 

100 PRINT #10,В5,А 

110 GOTO 90 

120 CLOSE INPUT #10 

130 ERASE "TEMP" 

135 GOTO 150 

140 CREATE #10,A$ 

145 QUOTE #10,34 

150 PRINT "INPUT THE DATA, ENDING WITH 'END,O'" 
160 INPUT В$,А 

170 ТЕ BS="END" THEN 200 

180 PRINT #10,B$,A 

190 GOTO 160 
200 CLOSE #10 


RUN 

FILE FOR APPENDING? STOCK 

INPUT YOUR DATA, ENDING WITH 'END,O' 
? ENVELOPES,100 

? CRAYONS , 47 

? ERASERS,29 

? END,O 


Ready: 


Example 5 


The last, most complicated, file-handling example is a bare-bones stock control 
program. A master file with a .NEW extension is updated from a transactions file 
with a .TRN extension. Each record of both files contains the now familiar one 
string and one number. If the string in a record of the transaction file matches one of 
the strings in the master file, the number from the transaction file is added to the 
master number. Otherwise, a new record is added to the master file. At the end of 
the run, the master file is updated and the transaction file deleted. 
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Deleting the transaction file avoids the possibility that the same set of transactions 
will be processed twice. For safety, a back-up copy of the master file is always kept 
in a file with a .OLD extension, and the old .OLD file is not deleted at the end of the 
run until the new .NEW file has been verified as correct. 


10 CLEAR 1000 

15 QUOTE #10, 34 :REM Enclose strings in quotes 
20 LET МХ=100 :REM 100 records maximum 
50 DIM DSCMX) ,DCMXO 

40 INPUT "FILE МАМЕ";Е5 

50 LET OM$-F$-".0OLD" 

60 LET NM$=F$+". NEW" 

ТО LET TR$-F$-*".TRN' 

80 LET ТМ$=Е$+".ТМР" 

90 OPEN #10, ММ$ : КЕМ Open new master 
ON EOF GOTO 160 

FOR K=1 TO MX : КЕМ Read in master 
INPUT #10,0 СК) , рск) 

МЕХТ К 

PRINT "TOO MANY DATA ITEMS" 

STOP 

CLOSE INPUT #10 

OPEN #10,TR$ 

ON EOF GOTO 310 

INPUT #10,D$,D : КЕМ Get new info 
FOR N=1 TO K-1 

IF D$<>D$ CN) THEN 250 

LET DCN) =р СМ) +р :REM Update master 
IF DCN) >=0 THEN 180 

PRINT "STOCK ITEM ";р$(М); 

PRINT '' HAS GONE NEGATIVE" 


ОС Чо O л анг О 


ОМ EOF GOTO 430 

FOR N=1 TO K-1 

INPUT #10,D$,D 

IF D$<>D$(N) OR D<>DCN) THEN 430 

NEXT N 

GOTO 470 

430 PRINT "NEW MASTER INCORRECTLY UPDATED"! 


210 

220 

230 

255 

240 GOTO 180 

250 NEXT N 

260 LET D$(K)=D$ : КЕМ Add new record 
270 LET D(K)=D 

280 LET K=K+1 

290 IF K>MX THEN 140 

300 GOTO 180 

310 CLOSE INPUT #10 

315 CREATE #10, ТМ$ : КЕМ Create FILE.TMP 
317 QUOTE #10,34 

520 FOR N=1 TO K-1 : REM Output new master 
550 PRINT Z10,D$ CND,DCND 

340 NEXT N 

550 CLOSE 410 

360 OPEN 810, ТМ5 : КЕМ Verify output 
370 

380 

390 

400 

410 

420 
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440 PRINT " PLEASE START AGAIN." 
445 CLOSE INPUT #10 
450 ERASE ТМ$ : КЕМ Erase temporary 
460 STOP 
470 CLOSE INPUT #10 
475 ERASE OM$ : КЕМ ERASE OLD MASTER 
480 ERASE TRS :REM ERASE TRANSACTION FILE 
490 RENAME OM$,NM$ : КЕМ NEW MASTER BECOMES OLD 
500 RENAME ММФ, TM$ :REM TEMP BECOMES NEW MASTER 
510 END 

EXAMPLES 6-8 


The last few examples cover the use of GET and PUT for simple tasks. 


Example 6 


This example covers the “Баге bones" of a simple program to teach children how to 
spell. This program appears to contain a simple INPUT statement, but in fact it will 
only accept the word *HOUSE'". It will ring the bell on the printer device, if one is 
fitted, when the word has been correctly input. Of course, a genuine program of this 


nature would be considerably more complicated: 


10 PUT "Type your word now : " 
20 LET Н$="НОУ$Е"+СНВ$ (13) 

30 FOR H=1 TO ГЕМСН) 

40 LET M$zMID$(H$,H,1) 

50 IF GET$()<>M$ THEN 50 

60 PUT M$ 

70 NEXT H 

80 PRINT "THAT IS CORRECT !!!" 
90 FOR L=1 TO 10 

100 PUT 42,7 
110 NEXT L 


Example 7 
This example reads a file using GET$ and prints it on the console: 
10 INPUT "FILE МАМЕ"; А$ 


20 ОРЕМ #10,А$ 
30 LET С$=6ЕТЗ$ (#10) 


40 IF C$-CHR$(&1A) THEN 70 :REM TEST FOR E-O-F 


50 PUT C$ 

60 GOTO 30 

70 CLOSE INPUT #10 
80 END 
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Example 8 


The last example is a game to test the players ability in addition: 
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| PUT 27,61,48,74,31 : КЕМ 40-ch mode & clear 


INPUT "Мо. of seconds for each answer : ",5 
PRINT 

PRINT "Уоч will be given 10 addition sums," 
PRINT '"with'';S;'seconds in which to" 

PRINT 'answer each one." 

PRINT: PRINT "End each of your answers by" 
PRINT "pressing the RETURN key. 

PRINT: PRINT "Are you ready? (Y/N) : ''; 
X$=GET$() 

IF X$="N" OR X$="n" GOTO 610 

IF X$«»'"Y" AND X$«»"y" GOTO 190 


| GRAPH: RANDOMIZE : WR=0: CO=0 


X=INTCRND(1)*100): Y=INTCRND(1)*100) 
X$=RIGHTS(C" "+STRSCX),3) 
Y$z'"-"-RIGHTS$(" "*+STRSCY),3) 

PLOT 20,21,X$ 

PLOT 18,18,Y$ 

PLOT 20,15,"---" 

PRINT: PRINT "Answer = "; 

T=100*S :ВЕМ Set time allowed for answer 
R=0 

Z=GET(C(T) 

IF T>O THEN Т=-1 

IF Z=13 THEN 470 

IF 7=0 THEN 430 

IF Z<ASC("0") OR 2>А$С ("9") THEN 350 
PUT Z 

R-R*10*Z-ASC('Q'') 

GOTO 350 

PRINT 

WR=WR+1 

PRINT "Sorry - out of time" 

GOTO 540 

PRINT 

IF R=X+Y THEN 520 

WR=WR+1 

PRINT "Wrong" 

GOTO 540 

СО+СО + 1 

РКТМТ "Соггест!" 

РКТМТ " СО тои от"; CO*WR 
IF CO+WR<10 GOTO 250 :REM Stop after tenth 


| GRAPH: PRINT: PRINT "Another go? (Y/N) : ''; 


X$-GET$() 

IF Х5-"У" OR X$z'y" THEN PRINT: GOTO 100 
IF Х$<>"М" AND X$«»''n'" GOTO 580 
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CHAPTER 15 


GETTING STARTED WITH 
HIGH RESOLUTION GRAPHICS 


Each BASIC interpreter is supplied in three versions, distinguishable by their 
filenames. Extended BASIC 5 has a filename stem of “BASICS”, and Extended 
BASIC 6 has a stem of “BASIC6”. The stem is followed by nothing, “С” or ‘С 2". The 
“С” and “G2” versions incorporate, respectively, Level 1 and Level 2 High Resolution 
Graphics support routines and to use these routines the computer must be fitted with 
the (optional) High Resolution Graphics Board. This chapter introduces Level 1 
routines with examples, chapter 16 presents a summary in alphabetical order and 
chapter 17 describes Level 2 routines. 


We suggest that you work through this introductory chapter at the computer. It is 
intended as a tutorial and you will probably only want to go through it once. After that, 
Chapter 16 and Appendix A can be used as required. 


Before starting to work through the examples you should ensure that your computer 
has high resolution graphics hardware installed. You must also use a version of 
BASIC incorporating high resolution graphics support. 


Some special terms are used. Here is a brief glossary: 


Pixel — а picture element. The number of pixels in а picture depends on the 
resolution selected. The amount of memory used to store each pixel (in 
bits) governs the number of intensities or colours with which it can be 
displayed. 


Resolution — HRG can operate in high resolution (320 by 192 pixels per picture), 
medium resolution (160 by 96) or, on the 480Z only, extra high 
resolution (640 by 192). 


Intensity — the intensity range of each pixel depends on its size in bits. For 
example, with 2 bits/pixel, its intensity can be defined symbolically as 
0, 1, 20r 3. 

Colour — aterm used to describe the physical brightness that corresponds to a 


given intensity. It can range from 0 to 255 (black to white). In colour 
systems red, green and blue components can be specified. 

Colour lookup 

table — a part of the HRG hardware in which each intensity is mapped to its 
corresponding colour. 

Page — two separate pages of graphics memory (two separate pictures) are 
available in medium resolution. 

View — by restricting the number of bits/pixel it is possible to have more than 
one picture on each page. These "logical" pages are called views. 
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References to Extra High Resolution Graphics (ЕНК) apply only to Ше 4807. 


GETTING STARTED 
Enter the following BASIC program: 


10 GRAPH : TEXT 

20 CALL "RESOLUTION",O,2 
30 CALL "PLOT" ,0,0,3 

40 CALL "LINE",150,90,3 


and type RUN. A diagonal line should appear on the screen running from the left near 
the bottom to the middle. If you get an error message, type LIST and examine the 
program for typing errors. Pay special attention to the quotation marks surrounding 
the name of each CALLed routine and to the comma following. Note that all HRG 
subroutine names must be given in UPPER CASE characters. (BASIC converts, if 
necessary, all keywords and variable names, but always leaves text strings 
unchanged): 


call "RESOLUTION",0O,2 із valid 
CALL "RESOLUTION",O,2 із valid 
call "resolution'",0,2 isinvalid 
CALL "resolution'',0,2 isinvalid 


If allis well, you are now ready to start programming with high resolution graphics. If 
you find the text going too fast, feel free to pause and try some experiments with what 
you have learned so far. 


CLEARING THE SCREEN 


Now have a look at the simple graphics program you have just typed in (type LIST). 
Notice that the program text and the high resolution display are superimposed. In line 
10, the command GRAPH clears the screen of text before plotting and confines 
subsequent text output to the bottom four lines of the screen, below the graphics area. 
TEXT allows text to occupy the full screen again. If you areunfamiliar with the effects 
of GRAPH and TEXT, try entering GRAPH then LIST. Then enter TEXT and LIST 
again. 


Another way to clear the screen of text is to press <CTRL/L> (hold down the CTRL 
key and type L) while BASIC is expecting a command (i.e. after the ''Ready:" prompt). 


During all of this the diagonal line has remained unchanged on the screen. This is 
because it is being produced from the high resolution graphics memory; this is entirely 
separate from the VDU memory from which text and low resolution graphics are 
displayed. One of the functions of the call to RESOLUTION in line 20 is to clear the 
high resolution memory. Try typing: 


CALL "RESOLUTION" ‚О, 2 


(no line number). The line disappears. Note that you have just made a CALL to a 
graphics routine in direct" mode (without a line number), as opposed to including the 
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call in a stored program. This is often useful when experimenting. 


SETTING THE RESOLUTION 


The resolution of a graphics display is determined by the number of separate picture 
elements used to create an image. In low resolution graphics, the number of picture 
elements is small but the size of each is large. In high resolution graphics, greater 
image clarity and definition is obtained by increasing the number of picture elements 
and reducing their size. A picture element is ofter referred to as a pixel. 


Another function of the RESOLUTION routine is (as suggested by its name) to set the 
resolution of the high resolution graphics display. Three modes are available: “high 
resolution" mode (HR) in which the display resolution is 320 pixels horizontally by 192 
pixels vertically; “medium resolution" (MR) with a resolution of 160 pixels 
horizontally by 96 pixels vertically; and “extra high resolution" mode (EHR) with a 
resolution of 640 pixels horizontally by 192 pixels vertically. 


A call to RESOLUTION is of the form: 
CALL "RESOLUTION",R,B 


where R is a number or numeric expression that can take the value 0, 1 or 2 and 
determines whether the resolution will be high, medium or extra high respectively, and 
B sets the amount of memory used by each picture element (see below). Thus the call to 
RESOLUTION in the example program had "argument" В equal to zero and 
therefore set high resolution mode. Try changing line 20 to: 


20 CALL "RESOLUTION",1,4 


and then running the program again. As can be seen, the diagonal line is twice as long 
as we are now in medium resolution mode; it is also rather dim as its intensity is only 3 
compared to a maximum of 15. 


'The second argument of the call to the RESOLUTION routine sets the number of bits 
to be used for each pixel. In HR mode, two bits are available for each pixel; this gives a 
choice of 4 intensities (colours or shades of grey) since the two bits can represent values 
of 0, 1, 2, or 3. With MR, four bits are available allowing you to choose from 16 
intensities, while in EHR mode only one bit is available, giving a choice of just two 
intensities (black or white). The effect of restricting the graphics storage for each pixel 
to two bits for HR mode or four bits for MR mode will be described later. 


A call to the RESOLUTION routine should always be made before starting a picture 
and it should be thought of as initializing the graphics system. Failure to supply both 
arguments will result in the error message: 


Bad no of args 


15.3 


GETTING STARTED WITH НВС 


PLOTTING POINTS AND LINES 


Lines 30 and 40 of the example program are responsible for drawing the diagonal line. 
PLOT causes a dot to be plotted; its general form is: 


CALL PLOT; Ко За 


which plots а dot of intensity I at position (X,Y). The origin, position (0,0), is set Бу 
RESOLUTION to the bottom left corner of the graphics area. In HR mode, the other 
three corners are, going clockwise, (0,191), (319,191) and (319,0). On a 380Z, however, 
the far right column (319) produces dimmer intensities. Therefore we shall assume 318 
to be the final column. Change line 20 of the program back to: 


20 CALL "RESOLUTION"',0,2 
then change line 40 onwards to: 


40 CALL "PLOT",0,191,1 
50 CALL "PLOT",318,191,2 
60 CALL "PLOT",318,0,3 


then RUN. The program puts a dot in each corner of the screen. The bottom left dot is 
bright (intensity 3), as is the bottom right one. The top left one should be rather dim 
(intensity 1) and the top right one somewhat brighter. If you cannot see all four dots, 
try adjusting the brightness and contrast controls of your TV/monitor. 


Like PLOT, the call to LINE is of the general form: 
CALL "LINE",X,Y,I 


but now (X, У) specifies the end point of a line. The start point is given either by a call to 
PLOT, or by the end point of a call to LINE, whichever occurred most recently. 
(RESOLUTION initializes these ‘‘memorised’’ XY coordinates to (0,0). To draw а 
rectangular box enclosing the screen, change PLOT to LINE in lines 40 to 60: 


40 CALL "LINE"'",0,191,1 
50 CALL "LINE,318,191,2 
60 CALL "ЧІМЕ",318,0,3 


and add: 
70 CALL "LINE"'",0,0 
and RUN. 
Note that the omission of the intensity argument in line 70 is deliberate. It can be left 


out in calls to both PLOT and LINE; the most recently supplied value is used, in this 
case intensity З. A call to RESOLUTION resets the ‘‘memorised”’ intensity to zero. 


There are two important reservations which should be borne in mind when using the 
call to LINE. Firstly, the LINE call does NOT plot the first point of the line, which is 
assumed to have been output by a preceding call to PLOT or LINE. Secondly, in 
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general, a line drawn in one direction will NOT be identical to a line joining the same 
two points but drawn in the opposite direction. This arises as a result of the high speed 
line drawing algorithm used. If you later wish to erase a line, make sure you draw over 
it in the same direction as it was originally drawn. 


RANGE OF XY COORDINATES 


As already mentioned, the visible screen extends in HR from (0,0) to (319,191). The 
values of X and Y passed in calls to PLOT and LINE are not restricted to this range, 
however. In fact X and Y can specify any point on a “virtual” screen which extends 
from —32768 to +32767 in both axes. You can demonstrate this by adding: 


80 CALL "PLOT',1000,1000,3 
90 CALL "LINE",-1000,-1000 


then typing RUN. A line will be drawn through the origin at intensity 3. 


If the X or Y value (or indeed any value in a CALL) is greater than 65535 or less than 
—65536 the error message: 


Illegal function 
appears. Values between +32767 and +65535 are treated by PLOT and LINE as 
though 65536 had been subtracted first, and similarly, values from —65536 to —32769 


have 65536 added. To avoid confusion you are advised only to use values in the range 
—32767 to +32767. 


MOVING THE ORIGIN 
In order to simplify graphics programs the OFFSET call allows the visible screen to be 
moved with respect to the virtual screen by setting the XY coordinates of the lower left 
corner of the visible screen. Its general form is: 

CALL "OFFSET'',X,Y 
If, for example, the statement: 


25 CALL. "OFESEI",-50,*5U0 


is added to the program, the lines that met at (0,0) move 50 screen units upwards and to 
the right. Try this first, then try: 


25 CALL "OFFSET",-1050,-1050 


You can now see the end point of the long line drawn by line 90 although none of the 
rectangle is visible. 


Note that OFFSET does not move any graphics already displayed; it merely resets the 
visible screen for graphics drawn subsequently. You can verify this by deleting line 25 
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and typing the same statement at line 75. Both parts of the picture are now seen. Note 
also that RESOLUTION always resets the offset to (0,0). 


OFFSET is sometimes convenient when plotting graphs. Try the following program: 


10 GRAPH : TEXT 

20 CALL "RESOLUTION",O,2 
50 CALL "OFFSET",0,-96 
40 LET A=16*ATN(1)/319 
50 FOR X20 TO 319 

60 LET Y=50*SINCA*X) 

70 CALL "PLOT",X,Y,3 

80 NEXT X 


which plots a sine wave across the middle of the screen. In this case OFFSET avoided 
the need to add a value to the Y coordinate calculated at line 60. 


If you are ready for a rest, you might like now to have a look at the STAR program 
(listed at the end of this chapter) which illustrates the use of the calls so far described. 


BLOCK FILL 


The FILL call provides a means for the rapid filling of a rectangular area of the screen, 
for example for drawing histograms. Its general form is: 


CALL "FILL",X1,Y1,X2,Y2,1 


This fills in the area whose lower left and top right corners are specified by the points 
(X1,Y1)and(X2,Y2), respectively. To draw a filled rectangle X2 should be greater than 
X1 and Y2 should be greater than Y1. If either X1 and X2 or Y1 and Y2 are the same 
then a vertical or horizontal line is drawn. If both X1,X2 and Y1,Y2 аге the same then a 
dot is drawn. If X2 is less than X1 or if Y2 is less than Y1 then nothing is drawn. 


As with PLOT and LINE, the intensity argument I can be omitted; if so the most 
recently used value applies 


See the examples at the end of this chapter (COSINE HISTOGRAM) for an example 
of block fill. | 


THE INTENSITY ARGUMENT 


In the examples so far, the intensity argument I has ranged from 0 to 3 in high 
resolution, from 0 to 15 in medium resolution or takes either of the values 0 or 1 inextra 
high resolution, where 0 corresponds to the background (initially black) and the non- 
zero values to progressively lighter shades of grey. In this mode plotted data 
overwrites any pre-existing information. For example: 
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10 CALL "RESOLUTION",O,2 

20 CALL "FILL",50,50,150,150,2 
50 CALL "PLOT",0,0,3 

40 CALL "LINE",200,200 

50 AS=GETS$() 

60 CALL "PLOT",0,0,0 

70 CALL "LINE",200,200 


This program first draws a grey square (red on a colour monitor) then overwrites it 
with a diagonal white line. Line 50 merely causes a pause until a key is pressed. The 
white line is erased by replotting it at intensity zero, leaving however a “black” line 
through the grey square. 


This can be avoided by using EXCLUSIVE-OR (ХОВ) plotting. Considering two 
binary digits (bits) A and B, the truth table of the XOR function is: 


A В A XOR B 
0 0 0 
1 0 1 
0 1 1 
1 1 0 


If we consider A to be the intensity bit we are plotting and B to be the existing screen 
content, it can be seen that when plotting a one, if the corresponding bit of the screen is 
off, it is turned on (set to one), while if it is already on it is turned off (set to zero). The 
important feature of XOR plotting occurs when a point is replotted in XOR mode at 
the same intensity. This is equivalent to combining A with A XOR B in the above 
table. It can be seen that the new result is identical with B. In other words, a point 
plotted in XOR mode is reversible without loss of the original information. 


XOR plotting takes place when the intensity argument is negative. In high resolution, 
values for I of —1 to —3 correspond to values of + 1 to +3 but are plotted by exclusive- 
OR rather than by replacement. 


То demonstrate this, change lines 30 and 60 to: 


30 CALL. *"PLOT';0,0,-73 
60 CALL "PLOT",0,0,-5 


Now, when the original line is replotted, the square is left intact. 


XOR plotting is useful for drawing data provisionally (e.g. an “elastic band” line from 
a fixed point to a roving cursor) or for temporarily highlighting an area by means of an 
XOR block fill. Note that both intensity settings have the same (negative) value for I, 
as opposed to replacement plotting when the two (positive) values are different. 


The example program STRIPES at the end of this chapter uses XOR plotting. 
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PEN UP MOVEMENTS 
It is occasionally convenient to reset Ше memorised (X,Y) coordinates (the start point 


of a line) without causing any graphical output. This occurs when an intensity 
argument of 16 is used. 


MODIFYING THE DISPLAYED INTENSITY 


A powerful feature of the Research Machines high resolution graphics in HR and MR 
modes is the ability to change almost instantaneously the displayed brightness that 
corresponds to one of the plotted intensities. For example, intensity 3 could first be set 
to display at the same level as the background. A complex picture could then be drawn, 
perhaps taking several seconds. Finally intensity 3 could be set to display as white, 
causing the complete picture to appear in an instant. 


In HR and MR modes, the mapping of the plotted intensity (in the range 0 to 3 or 0 to 
15 as previously described) to the displayed intensity, a value from 0 to 255, 
corresponding to shades of grey from black to white, is carried out by means of a 
special hardware area on the graphics board called the colour lookup table and the 
values this contains are set by the COLOUR call. In EHR mode the mapping of the 
intensity value does not pass through the colour lookup table and consequently only 
black (0) or white (1) are available. 


In HR and MR modes, a call to RESOLUTION sets up default values in the colour 
lookup table. For example, in high resolution, the values assigned to plotted 
intensities of 0, 1, 2 and 3 are 0, 64, 128 and 255, corresponding to black, dark grey, 
light grey and white. In medium resolution, the intensity arguments 0 to 15 are 
similarly mapped to black and 15 progressively lighter shades of grey, again arranged 


in an approximately logarithmic series, which the eye sees as roughly equal steps of 


brightness. 


These default values can be changed at any time by a call to COLOUR, in HR and MR 
modes. In EHR mode, a call to COLOUR will have no effect. The call is of the general 
form: 


CALL "COLOUR"'',I,N 


where I is the plotted intensity value (range 0 to 3 for high resolution, 0 to 15 for 
medium) and N is the new displayed intensity (range 0 to 255). For example, in high 
resolution, the statements: 


100 CALL "COLOUR",0,255 
110 CALL "COLOUR",1,128 
120 CALL "COLOUR",2,64 
130 CALL "COLOUR",3,0 


would reverse any graphics currently displayed, causing the appearance of a 
"negative". Note that a call to COLOUR can easily be placed in a loop, allowing a 
picture to be faded up or down. For example: 


И ESR SE HOON в ih отт 


GETTING STARTED WITH HRG 


140 FOR N=1 TO 255 
150 CALL "'COLOUR",3,N 
160 NEXT N 


fades intensity 3 up from 0 (black) to 255 (white) again. 


A call to COLOUR with no arguments: 


170 ALL "COLOUR" 
p restores the default values as set by RESOLUTION. 
For example type in: 
| CALL "RESOLUTION" ,0,2 
CALL "PLOT",0,187,3 
CALL "LINE",4,191,3 
and a smallline will be drawn in the top left hand corner of the screen. The situation will 
be as shown below: 


Screen Display Graphics Memory 


Each pixel that makes up the line holds the value 3, but the displayed intensity for 
each pixel is 255. 


If you now type 


CALL "COLOUR",3,100 


the value 100 will be placed into position of 3 of the colour lookup table replacing value 
255 and so the colour of the whole line will change from 255 to 100, as shown overleaf. 
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Graphics Е 
Memory | 

Display 

Intensity 100 


Colour Lookup Table 


SETTING THE COLOUR 


In the description so far, it has been assumed that the graphics output is being 
displayed in black and white. The graphics memory can also display in colour, 
provided a colour monitor is available. As described in the previous section, the 
hardware colour lookup table maps the plotted intensity (pixel information) to a value 
between 0 and 255, that is, to an 8-bit value. When using a colour monitor it is often 
more convenient to use an alternative form of the colour call: 


CALL "COLOUR",1,R,G,B 


where I corresponds to the plotted intensity as before and R, С and В are the required 
values for red, green and blue. Parameters R and G may take values between 0 and 7. 
On а 4807, values of 4,5,6 or 7 turn the red or green colour on, whereas values 0,1,2 or З 
turn the red or green colour off. On a 3807, the value specifies the colour intensity (0 for 
colour off) with 7 representing the highest intensity. Parameter B may take any value 
between 0 and 3. On a 480Z a value of 2 or 3 will turn the blue colour on and 0 or 1 will 
turn the blue colour off. On a 380Z the vlaue of parameter B specifies the blue colour 
intensity. Giving R, G and B values of 0 will generate black and giving R and G values 
of 7 and B a value of 3 will generate white. On a 480Z system, combinations of red, blue 
and green will generate the three colours yellow, magenta or cyan. 


PROGRAMMING MORE THAN ONE PICTURE 


So far the discussion has been confined to a single picture. In high resolution with two 
bits/pixel and extra high resolution with one bit/pixel only one picture is available; the 
whole of the usable graphics memory is needed. In the other mode mentioned, medium 
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medium resolution with four bits/pixel, only half of the graphics memory is used and 
two separate pictures can be constructed. 


These are considered to occupy two “pages” of the (medium resolution) graphics 
memory and the pages’are numbered 0 and 1. It is important to note that you can 
display either page 0 or page 1, but never both together. (This is a consequence of the 
way the graphics hardware is designed.) After a call to RESOLUTION, page 0 is 
selected both for display and for update. Calls to PLOT, LINE and FILL write to page 
0 and the display circuits show the contents of page 0 on the screen. 


The page on which plotting takes place can be changed by a call to UPDATE of the 
general form: 


CALL "UPDATE" ,P 


where P has the value 0 or 1, and similarly, the page that is displayed can be ee 
by a call to DISPLAY of the form: 


CALL "DISPLAY",P 


Notice that the separation of the update and display functions allows you to display 
one picture while generating another, thus allowing a degree of animation without the 
relatively slow process of picture generation being visible. 


The following simple example clarifies this: 


10 GRAPH : TEXT 

20 CALL "RESOLUTION",1,4 
30 CALL "UPDATE" ,O 

40 CALL "PLOT'",0,0,8 

50 CALL "LINE'',159,95 

60 CALL "UPDATE", 1 

70 CALL "PLOT'",0,95,15 
80 CALL "LINE",159,0 

90 INPUT "Display which раде";Р 
100 CALL "DISPLAY",P 

110 GOTO 90 


Page 0 displays a medium grey line from bottom left to top right, page 1 a white line 
from top left to bottom right. Line 90 allows you to select one or the other. Type 
CTRL/Z to exit. | 


You are reminded that these two pages are only available in medium resolution. 


USING A REDUCED NUMBER OF BITS/PIXEL 


The graphics software also supports three additional modes in which the number of 
bits/pixel is reduced. The effect of this is to restrict the number of separate intensities 
that can be displayed and instead to allow multiple pictures to be generated. In a way 
the result is similar to the concept of "раєез" in medium resolution which has just 
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been introduced but since the effect is available in high resolution as well and since the 
mechanism is different, the name “view” has been chosen. Considering high 
resolution, we can either select 2 bits/pixel (as we have done so far) or 1 bit/pixel and 
have two views. Multiple views are not possible in extra high resolution since only 1 
bit/pixel is available for the intensity information. Like pages, views are normally 
displayed separately, but since view selection is carried out by software manipulation 
of the colour lookup table, it is possible to arrange to display more than one view at 
once. 


As indicated earlier, the choice of number of bits/pixel is made by the arguments used 
in a call to RESOLUTION. Thus the call: 


10 CALL "RESOLUTION" , 0,1 


sets high resolution with one bit/pixel and two views, view 0 and view 1. The choice of 
. view is made in the same way as for page in medium resolution; thus CALL 
"UPDATE',1 selects view 1 for PLOT, LINE and FILL; CALL "DISPLAY",1 
results in view 1 being displayed. As before, RESOLUTION automatically selects 
view 0 both for update and display. Note that in this mode, the intensity argument I 
can only take on values of 0 or 1. (In fact the I argument is ANDed with the maximum 
value allowed, so that if, for example, 2 is supplied, 2 AND 1 (= 0) is used for plotting.) 
However as before the shades of grey or colours that correspond to the two intensities 
can be changed by calls to COLOUR. For example: 


10 CALL "RESOLUTION" ,0,1 
20 CALL "COLOUR",0,0,0,3 
30 CALL "COLOUR",1,7,0,0 
40 CALL "PLOT",0,0,1 

50 CALL "LINE",219,191 


will plot a red diagonal line on a blue background as view 0. 


MULTIPLE VIEWS IN MEDIUM RESOLUTION 


The remaining two modes that can be selected are both in medium resolution. If the 
pixel is restricted to one bit by a call of the form: 


10 CALL "RESOLUTION'',1,1 
we still have two pages but each contains four views, making eight pictures in all. The 


intensity argument may take on values of 0 or 1. Calls to UPDATE and DISPLAY 
require two arguments and are of the form: 


CALL "UPDATE",P,V 
CALL "DISPLAY",P,V 


where P is the page (range 0 to 1) and V is the view (range 0 to 3). The N argument ina 
call to COLOUR must lie in the range 0 to 1. 


Similarly, a two bit pixel can be selected, giving a choice of two pages, each with two 
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views and four intensities. 


The six possible modes are conveniently referred to as HR2 (high resolution, 2 
bits/pixel), EHR, HR1, МВА, MR2 and МВ1. 


Notice that although UPDATE and DISPLAY accept a variable number of 
arguments (page, view or both, depending on mode) both page and view can always be 
supplied without confusion. In MR4 for example, the view argument is ignored if 
supplied, while in HR1 the page argument is discarded. 


The program REVOLVE, in the examples to be found at the end of this chapter, shows 
how eight medium resolution pictures can create the illusion of motion when displayed 
in rapid succession. 


CLEARING A VIEW 


When working with more than one view it is frequently desirable to clear a view prior 
to updating it. (This will usually be done invisibly in the “background by selecting 
another completed view for display.) One means of doing this, having selected the view 
for update, is simply to block fill it with intensity 0. For example, іп HR1, the 
statements: 


50 CALL UPDATE,1 

60 CALL FILL,0,0,319,191,0 
would clear view 1. As a convenience, the call to CLEAR has the same effect. Thus the 
above example can be replaced by: 


50 CALL UPDATE,1 
60 CALL CLEAR 


CLEAR absolves the programmer from having to be aware (at that moment) of the 
current offset or resolution. 


DISPLAYING MORE THAN ONE VIEW 


This Section can be skipped on first reading; it is only necessary to study it when you 
wish to display more than one view at once. 


Multiple views (but NOT multiple pages) are achieved by manipulation of the colour 
lookup table. Consider high resolution; normally, with 2 bits/pixel, intensities 0 to 3 are 
arranged to map to black, dark grey, light grey and white in the colour lookup table 
(CLT). We may represent this as: 


(a PIXEL CLT 


00 0 
01 64 
10 128 
11 255 
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If instead we arrange that only pixels in which the less significant bit are set are 
displayed at an intensity different from the background, these become the only pixels 
that are visible. The colour lookup table might become: 


(b) PIXEL CLT 


00 0 
01 200 
10 0 
11 200 


Information represented by the more significant bit is not differentiated from 
background (except where the less significant bit is also set). Alternatively we can 
arrange to suppress the information carried in the less significant bit: 


(c) PIXEL CLT 


00 0 
01 0 
10 200 
11 200 


and only see the more significant bit. 


This is the means used to achieve the separate views. After a call to RESOLUTION 
which specifies a restricted number of: bits/pixel (modes HR1, МВ! and MR2), 
DISPLAY swaps around the colour lookup table in the manner outlined above, 
UPDATE arranges that PLOT, LINE, FILL and CLEAR only modify the 
appropriate part of each pixel and COLOUR modifies the entries in the colour lookup 
table appropriate to the currently selected view. Thus in the illustrations of colour 
table organisation above, intensity 0 corresponds to a displayed intensity of zero and 
intensity 1 to 200, but the positions in which 0 and 200 appear depend on whether view 
0 or view 1 is selected for display. 


It is by manipulation of these positions that the programmer can select a combination 
of views. Thus to display both view 0 and view 1, the colour table is changed to: 


(d) PIXEL CLT 


00 0 
01 200 
10 200 
11 200 


while to display only those pixels which are common to view 0 and to view 1, the 
table is: 
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(e) PIXEL CLT 


00 0 
01 0 
10 0 
11 200 


It should be realised that case (a) is automatically selected when the resolution is 2 
bits/pixel, and that with 1 bit/pixel, cases (b) and (c) occur automatically as a result of a 
call to DISPLAY requesting view 0 or 1. It is only when case (d) or case (e) is required 
that programmer intervention is necessary. 


Two additional calls allow direct manipulation of the colour table. SETCOL sets a 
specified element of the colour table to a display intensity value. Its general form is the 
same as that for COLOUR, namely: 


CALL "SETCOL",I,N 


where І is the “address” in the colour table to modify and М is the new value. Again, an 
alternate form is available for use with a colour monitor: 


CALL "SETCOL",I,R,G,B 


Calls to SETCOL do not actually effect any change in the contents of the colour table 
but merely set up the values in memory (in a special copy of the colour table which is 
maintained in all modes). When all the values to be changed have been set up, the 
colour table is loaded by a call to VIEW of the form: 


CALL "VIEW'',P 


The P argument indicates which medium resolution page is to be displayed. It can be 
left out in high resolution but must be supplied in medium. 


When using SETCOL and VIEW it is important for the programmer to realise that he 
is taking over functions that are normally carried out automatically. Thus in HR 
modes he must set up four intensity entries with SETCOL even when, as in mode НВ1, 
there are only two logical intensities in use. Similarly, in the MR modes, all sixteen 
intensity entries must be defined. (The logical intensities are normally multiplexed 
into the colour lookup table by DISPLAY or COLOUR.) 


The following program selects mode HR1, setting up case (d) with view 0 and view 1 
displayed simultaneously: 


10 CALL "RESOLUTION",O,1 
20 DATA 0,200,200,200 

30 FOR 1=0 TO 3 

40 READ N 

50 CALL "SETCOL",I,N 

60 NEXT I 

70 CALL "VIEW" 
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You need only change line 20 to: 
20 DATA 0,0,0, 200 
to set up case (е), displaying instead those pixels that are common to view 0 and view 1. 


Note that this method is also of general application in all modes (except EHR). It 
provides a means of deferring the alteration of the colour table until all the colours 
have been selected. This is not normally of concern in high resolution, but in medium 
resolution, the changing of all 16 colours by use of the COLOUR call does cause a 
discernible "ripple" owing to the finite time a call to COLOUR takes. (This is partially 
because COLOUR waits for the end of a frame, up to 20 ms, before changing the colour 
table. Sixteen calls to COLOUR therefore take at least 320 ms.) Instead, then, the 
sixteen colours can be selected by SETCOL and finally loaded into the table by VIEW, 
thus changing all the displayed colours at once. Examples of both methods follow: 


10 CALL "RESOLUTION" ,1,4 

20 DATA ...specifying the colours 
30 FOR 1=0 TO 15 

40 READ R,G,B 

50 CALL "COLOUR",I,R,G,B 

60 NEXT I 


10 CALL "RESOLUTION"'",1,4 

20 DATA ...specifying the colours 
30 FOR 1=0 TO 15 

40 READ R,G,B 

50 CALL "SETCOL",I,R,G,B 

60 NEXT I 

70 CALL "МІЕН",0 


Remember that VIEW must be followed by page in medium resolution. 
User alteration of the colour table is more complicated in modes MR1 and MR2 than in 
mode НВ1 but follows the same general principles. Appendix E contains tables 


showing which colour table elements affect which view. 


The example program GRAPH illustrates the use of SETCOL and VIEW in 
displaying two views simultaneously. 
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EXAMPLES 


This section contains a number of BASIC programs that generate pictures. Their 
main purpose is to illustrate various aspects of the graphics support routines; they are 
not intended to perform useful functions. However they do embody a few sections 
which may be of use in other programs. 


STAR 


This program illustrates line drawing in high resolution. The pictures are drawn 
with 2 bits/pixel but since only intensity 3 is used, they could equally well be in 


mode HR1 


100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
255 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 


. OFFSET is used to simplify the calls to PLOT and LINE. 


REM-- STAR 

DIM X(15),Y(15) 
R1=110: REM X RADIUS 
R2=90: REM Y RADIUS 
X02159: REM X CENTRE 
YO=95: REM Y CENTRE 
GRAPH : TEXT 
Р2=АТМ (1) “8 

2=5 


FOR N=3 ТО 15 :REM for each start 


A1=P2/N 


FOR J=1 TO М :REM compute coordinates 


A=A1*J 

Хх (J) =R1*COS (А) 
YCJ)-R2*SIN(CA) 

NEXT J 

REM Draw Star 

CALL "RESOLUTION" ,0O,2 
CALL "OFFSET"",-X0,-YO 
FOR J=1 TO N-1 

FOR К=1 TO N-J 

CALL "РЕОТ",ХСК), УСК), 2 
CALL "LINE"! W X(K+J),Y(K+J) 
NEXT K 

NEXT J 

REM-- WAIT A WHILE 

FOR 920 TO 1000: NEXT J 
NEXT N 

GOTO 190 
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COSINE HISTOGRAM 


This program shows how to draw a histogram of data which in real life might be the 
frequency distribution of events, etc. The histogram is drawn in two tones to make 
it more dramatic (remove line 180 to keep to one tone). 


Lines 240 onwards are a simple general-purpose axis routine where XL and XH are 
the absolute X coordinates of the ends of the X axis, XY is its Y coordinate, XI is the 
X axis increment and TI is the size of the tick marks. YL, YH, YX and YI are the 
corresponding Y axis values. 


100 
110 
120 
150 
140 


150 
160 
170 
180 
190 


200 
210 
220 
230 


240 
250 
260 
270 
280 
290 
300 
510 
520 
530 
540 
550 
560 
570 
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REM-- COSINE HISTOGRAM 
GRAPH : ТЕХТ 

CALL "RESOLUTION",O0,2 
A=8*ATN(1)/320 

Z=0 


FOR 020 TO 310 STEP 10 
Y=80*(1-COS(A*(J+5))) 
CALL. "FILL"W,J,0,J+9,Y,Z+1 
221-2 

NEXT J 


XL=0:XH=318:XY=0:XI=10 

УЕ =0 : YH=191:YX=160:YI=10:TI=2 
GOSUB 240 

END 


REM-- DRAW AXES 

CALL. "PLOT", XL,XY;,3 
CALL "LINE",XH,XY 

FOR X=XL TO XH STEP XI 
CALL '"PLOT",X,XY-TI,3 
CALL "LINE",X,XY-*TI 
NEXT X 

CALL "PLOT",YX,YL,3 
CALL "LINE'",YX,YH 

FOR Y=YL TO YH STEP YI 
UALL-"PLOT";YX-TI,Y, 5 
CALL "LINE",YX*TI,Y 
NEXT Y 

RETURN 
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STRIPES 


This short program draws (cubist?) pictures. It demonstrates the speed of the block 
fill and provides a trivial example of “XOR plotting” (variable C may be negative). 
A more important example of the use of XOR plotting is to remove a point or a line 
from the display. This is done by replotting the same data using negative 
intensities. 


00 REM-- STRIPES 

О GRAPH : TEXT 

О RANDOMIZE 

О CALL "RESOLUTION",1,4 

0 XO=RND(1)*160 

О X1=RND(1)*160 

О IF XO>X1 THEN T=XO: XO=X1: X1=T 
0 YO=RND(1)*96 

180 Y1=RND(1)*96 

190 IF YO>Y1 THEN T=YO: YO=Y1: у1-т 
200 C=INTCRND(1)*31-15) 

210 CALL "FILL",X0,Y0,X1,Y1,C 

220 GOTO 140 
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REVOLVE 


This program shows how you can draw up to 8 pictures in separate pages and views 
(selected by variables P and V), then display them in sequence to give an impression 
of movement. In order to make the program as clear as possible, the pictures have 
been kept very simple. 


100 REM-- REVOLUTION 
110 CALL "RESOLUTION",1,1 
120 GRAPH :TEXT 

130 REM-- CREATE 8 PICTURES 
140 PI=ATN(1)*4 

150 x0=80 

160 YO=42 

170 R=40 

180 А-РІ/8 

190 FOR Р=0 TO 1 

200 FOR V=0 TO 3 

210 CALL "UPDATE",P,V 
220 A1=A*(&*P+V) 

230 X=R*COS(A1)+X0 

240 YR*SIN(CA12-*YO 

250 CALL "PLOT",X,Y,1 
260 X=R*COS(A1+PI)+XO 
270 Y-R*SINCAT-«PIO *YO 
280 CALL "LINE",X,Y,1 
290 CALL "DISPLAY",P,V 
300 NEXT V 

310 NEXT P 

320 REM-- DISPLAY EACH IN TURN 
330 FOR P=0 TO 1 

340 FOR V=0 TO 3 

550 CALL "DISPLAY",P,V 
355 REM-- WAIT A WHILE 
360 FOR I=1 TO 10 

370 NEXT I 

380 NEXT V 

390 NEXT P 

400 GOTO 330 
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GRAPH 


This program plots a series of graphs of random data on a grey grid. Block fill is 
used to plot a little square at each graph point; the points are joined by lines. High 
resolution with one bit/pixel is used, giving two views. The grid is plotted as view 0 
and its intensity is set to 128 by line 140 (it would be 200 by default). The graphs are 
drawn as view 1 but the SETCOL and VIEW calls are used to load the colour lookup 
table directly, thus allowing view 0 and view 1 to be displayed simultaneously. 
Intensities 2 and 3 govern the intensity of the graph; this is set to 255 by lines 
260-280. At line 440 the graph is made invisible by setting intensity 2 to 0 and 
intensity 3 to the grey grid colour (to deal with graph points on the grid). Then the 
graph is erased by calling CLEAR. Note that the grid remains visible throughout. 


This is a fairly advanced example illustrating direct loading of the colour lookup 
table. 


100 REM-- GRAPH DRAWING 
110 GRAPH : TEXT 
120 CALL "'RESOLUTION",O,1 


130 REM-- MAKE GRID 

140 CALL "COLOUR",1,128 

150 FOR X=0 ТО 310 STEP 10 

160 CALL "PLOT",X,0,1 

170 CALL "LINE",X,190 

180 NEXT X 

190 FOR Ү=0 ТО 191 STEP 10 

200 CALL "PLOT",0,Y,1 

210 CALL "LINE"'",3510,Y 

220 NEXT Y 

250 CALL "UPDATE'',1 

240 REM-- LOOP TO PLOT GRAPHS 
250 REM-- DISPLAY VIEW O AND VIEW 1 
260 DATA 0,128,255,255 

270 RESTORE 260 

280 GOSUB 510 

290 1=20:Ј=2 

300 REM-- DO 1ST POINT 

510 X020: YO=RND(1)190 

320 CALL"FILL",X0-J,YO-J,X0*J,YO-*J,1 
330 REM-- DO REST OF GRAPH 

340 FOR Х=1 TO 310 STEP I 

350 Y=RND(1)*190 

360 CALL"PLOT",X0,Y0,1 

370 CALL''LINE'',X,Y 

380 CALL''FILL",X-J,Y-J,X*J,Y*J 
390 X0=X:Y0=Y 

400 МЕХТ Х 


410 REM-- WAIT А WHILE 
420 FOR K=0 TO 4000 
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430 NEXT K 

440 REM-- BLANK VIEW 1 
450 DATA 0,128,0,128 
460 RESTORE 450 

470 GOSUB 510 


480 REM-- CLEAR VIEW 1 AND LOOP BACK 
490 CALL "CLEAR" 
500 GOTO 270 


510 REM-- SET COLOUR VECTOR FROM DATA 
520 FOR KnO TO 3 

550 READ N 

540 CALL "SETCOL",K,N 

550 NEXT 

560 CALL "VIEW" 

570 RETURN 


Try changing line 450 to: 
450 DATA 0,128,0,0 
The effect of a static grid with changing graphs can also be obtained in mode HR2 


by plotting the graph in XOR mode but the graph coordinates would have to be 
stored to allow them to be used again for “ипро тр”. Try it! 


—————————————— 
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CHAPTER 16 


HRG ROUTINES - REFERENCE SECTION 


This chapter contains the formal definitions of the graphics routines that can be called 
from BASIC. These routines are available from Level 1 and Level 2 graphics. For a 
description of extra graphics routines for Level 2 only see chapter 17. The descriptions 
are in alphabetical order and are set out as follows: 


m Form: shows the correct form for calling the routine. 
Purpose: а brief summary of what the routine is used for. 


Remarks: describe in detail how to use the routine. 


Examples: contain sample program fragments that demonstrate how to call the 
routines. 


Fm NOTE 1. References to Extra High Resolution Graphics (EHR) apply only to the 
| x 4807. 


МОТЕ 2. Users of previous versions of BASIC will note that the method of 
saving pictures on (and restoring pictures from) disc has changed: 
HRG routines GSAVE, WRITE, READ and GLOAD are obselete, 
and have been superseded by GWRITE and GREAD. The old routines 
are mentioned here only because there may exist some programs that 
use them. 


Routines GLOAD and GSAVE now have no effect and return without 
any action. Routines READ and WRITE will have their three trailing 
parameters ignored, otherwise be treated as GREAD and GSAVE. 
Thus old programs will still work as before, provided they transferred 
whole pictures and started from record 0 in the file. 
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CLEAR 


Forms: 
Purpose: 


Remarks: 


Example: 


16.2 


CALL "CLEAR" 
To clear the currently selected page and view. 


CLEAR clears the page and view selected by UPDATE to logical 
intensity 0. It works by making an internal call to FILL and absolves 
the programmer from having to be aware of the current resolution and 
offset. It is useful when clearing selected views but calling 
RESOLUTION is faster when it doesn't matter that the whole of 
graphics memory is cleared. 


10 CALL "RESOLUTION"'',1,1 
20 CALL "UPDATE",1,3 
50 CALL "CLEAR" 


clears view 3 of page 1. 


OOH 


COLOUR 


Forms: 


Purpose: 


Remarks: 


HRG ROUTINES — REFERENCE SECTION 


CALL "COLOUR",I,N 
CALL "COLOUR",I,R,G,B 
CALL "COLOUR" 


To set the actual intensity or colour displayed on the screen that 
corresponds to a logical intensity I. 


COLOUR sets the value in the colour lookup table that corresponds to 
the logical intensity I plotted by PLOT, LINE or FILL. In EHR mode 
this CALL will have no effect. 


The first form with two arguments is used with black and white 
displays. The value of N can range from 0, which displays as black, to 
255, displaying as white, with a continuous range of progressively 
lighter shades of grey in between. 


The second form with four arguments is for colour displays. On а 4807, 
values of 4,5,6 or 7 turn the red or green colour on, whereas values 0,1,2 
or З turn the red or green colour off. On а 3807, the value specifies the 
colour intensity (0 for colour off) with 7 representing the highest 
intensity. Parameter B may take any value between 0 and 3. On a 480Z 
a value of 2 or 3 will turn the blue colour on and 0 or 1 will turn the blue 
colour off. On a 380Z the value of parameter B specifies the blue colour 
intensity. Giving R, G and B values of 0 will generate black and giving 
В and С values of 7 and B a value of 3 will generate white. On a 4807, 
system, combinations of red, blue and green will generate the three 
colours yellow, magenta or cyan. 


Calling RESOLUTION sets up default values in the colour lookup 
table such that increasing logical intensity corresponds to 
approximately equal steps of increasing brightness. (These default 
values are in general only suitable for black and white displays.) 


The third form of the call to COLOUR with no arguments restores the 
default values set by RESOLUTION. 


The table below shows the values of В, С and B which will generate 
each of the eight possible colours on a 4802. 


R G B COLOUR 
«4 <4 <2 Black 

<4 <4 >=2 Blue 

<4 >=4 <2 Green 
>-4 <4 <2 Red 

>=4 >=4 <2 Yellow 
>=4 <4 >=2 Magenta 
<4 >=4 >=2 Cyan 
>=4 >=4 >=2 White 
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Example 10 CALL "RESOLUTION" ,0,2 
20 DATA 255,128,64,0 
50 FOR 1=0 TO 3 
40 READ N 
50 CALL "COLOUR",I,N 
60 NEXT I 


sets the colour lookup table to produce a reversed image. (The default 
values for the lookup table in mode HR2 are 0, 64, 128 and 255.) 


МНО а о no hint 


DISPLAY 


Forms: 


Purpose: 


Remarks: 


Example: 
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CALL "DISPLAY",P,V (all modes) 
CALL "DISPLAY",V (HR1) 
CALL "DISPLAY',P (MR4) 


To display page P, view V. 


In mode HR2 and EHR there is only one page and view and this call is 
not used. In all MR modes there are two separate pages, numbered 0 
and 1. In modes HR1 and MR2 there are two views, numbered 0 and 1, 
and in mode МВ1 there are four views, numbered 0 to 3. 


After a call to RESOLUTION, page 0 view 0 is selected for display. 
Calling DISPLAY changes the page and/or view of graphics memory 
that is displayed. Similarly, calling UPDATE selects the page and view 
that will be modified by PLOT, LINE and FILL. 

P may be omitted in mode НЕ and У in mode МВА. 


10 CALL "RESOLUTION,1,1 
20 CALL "РІ5РІАУ",1,5 


set mode МВІ, then select page 1, view 3 for display. 
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FILL 


Forms: 


Purpose: 


Remarks: 


Example: 


CALL. "FILL",X1,YT1,X2,Y2,I 
CALL "FILL",X1,Y1,X2,Y2 


To fill the rectangle whose lower left corner is (X1, 1) and upper right 
corner is (X2,Y2) with intensity I. 


The point (X1,Y 1) specifies the lower left corner and the point (X2,Y2) 
the upper right corner of a rectangle to be filled in. These ХУ values can 
lie in the range -32768 to +32767 but extend only to the edge of the 
screen. Thus X1 can never be less than the left hand border, X2 never 
more than the right border, Y1 never less than the lower border and Y2 
never more than the upper border. If X1 and X2 are the same but Y2 is 
greater than Y1, a vertical line is drawn, and if Y1 and Y2 are the same 
but X2 is greater than X1, a horizontal line is drawn. If X1 is the same 
as X2 and Y1 is the same as Y2, a point is plotted. If X2 is less than X1 
or if Y2 is less than Y1 then there is no output. 


I determines the logical intensity of the block in the same way as for 
PLOT (see elsewhere in this chapter). If omitted the value last specified 
in a call to PLOT, LINE or FILL is used. 

The “memorised” XY coordinates are not affected by FILL. 

10 CALL "FILL",50,50,100,100,2 


fill the block whose corners are (50,50) and (100,100) with intensity 2. 


—————————————————— 


Р тү, 


У я 


GREAD 
Form: 
Purpose: 
Remarks: 


Example: 


HRG ROUTINES — REFERENCE SECTION 


CALL "GREAD'',A 
To load into graphics memory a picture stored in a disc file. 


GREAD requires one parameter, specifying the channel number by 
which the disc file is to be read. This number will normally be 10 
(especially in Extended BASIC Version 5). 


The disc file to be read should have been written by GWRITE (if it was 
not, see Note 2 on page 16.1). 


If the program that wrote the disc file stored the contents of the colour 
lookup table as well as the picture elements, then the original 
intensities or colours can also be restored by means of some GET 
commands and calls to subroutine COLOUR. 


If GREAD reads a file containing insufficient data to fill the entire 
screen, it reports the fact with the error message: 


Insufficient data 


The following program will read and display the picture stored in a disc 
file by the program used as an example under GWRITE: 


10 CALL "RESOLUTION",0,2 

20 OPEN Z10,"NEWFILE.PIC" 

30 CALL '"GREAD'',10 :REM Reconstruct picture 
55 REM from disc file and 
40 REM Find colours used 
50 С1=СЕТ (#10): CALL "COLOUR",0O,C1 

60 С2=6ЕТ(#10): CALL "COLOUR",1,C2 

70 C3=GETC#10): CALL "COLOUR",2,C3 

80 C4=GETC#10): CALL "COLOUR",3,C4 

90 CLOSE INPUT #10 
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GWRITE 
Form: 
Purpose: 


Remarks: 


Example: 


16.8 


CALL "СИВІТЕ",А 
To save the contents of graphics memory in a disc file. 
GWRITE requires one parameter, specifying the channel number by 


which the disc file is to be written. This number will normally be 10 
(especially in Extended BASIC Version 5). 


. Disc files written by GWRITE are expected to be read by GREAD. 


It may also be useful to store in the same disc file not only the picture 
elements, as written by subroutine GWRITE, but also the contents of 
the colour lookup table. This can be done by means of the PUT 
command, and it is recommended that, if present, this data should 
follow that written by GWRITE in the disc file. 


The following program will write to disc file NEWFILE.PIC first the 
picture elements, then the colour lookup table, of the current HRG 
screen, as required by the sample program under GREAD: 


10 CALL "RESOLUTION" ‚0,2 

20 REM Yellow Cyan Blue Magenta 
50 C12237: C22182: C3=18: C4=91 
40 CALL "COLOUR",0,C1 

50 CALL "COLOUR",1,C2 

60 CALL "'COLOUR",2,C3 

70 CALL "COLOUR",3,C4 


- (Generate picture on the screen) 


200 REM Save picture in file NEWFILE.PIC 
210 CREATE Z10,"NEWFILE.PIC 

220 CALL "СИВТТЕ" , 10 

230 REM Save colours used in NEWFILE.PIC 
240 PUT #10,C1,C2,C3,C4 

250 CLOSE #10 
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LINE 


Forms: 


Purpose: 


Remarks: 


Example: 
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CALL "LINE",X,Y,I 
CALL "LINE",X,Y 


То draw a line on the screen of intensity I ending at the point (X, У). 


LINE takes as its start point the end point of the previous line or the 
last plotted point, whichever occurred most recently, and draws a line 
to the end point (X, Y) specified in the call. X and Y can lie іп the range 
—32768 to +32767; a line is only visible if it falls wholly or partially 
within the screen limits defined by RESOLUTION and OFFSET. 


I determines the logical intensity of the line in the same way as for 
PLOT (see elsewhere in this chapter). If omitted the value last specified 
in a call to PLOT, LINE or FILL is used. 


CAUTION 1: the start point of the line is NOT plotted. (If it was, 
exclusive-OR plotting would not work correctly.) 


CAUTION 2: a line is usually not identical when drawn in the two 
possible directions. If you require to 'unplot' a line by replotting it with 
background intensity or by exclusive-OR plotting, make sure you plot 
it in the same direction as it was originally plotted. 


10 CALL "PLOT",0,0,3 
20 CALL "LINE",100,50 


draws a line at intensity 3 from (0,0) to (100,50). 


16.9 


HRG ROUTINES — REFERENCE SECTION 


OFFSET 


Form: 
Purpose: 


Remarks: 


Example: 


CALL “OFFSET X Y 
To change the XY coordinates of the lower left corner of the screen. 


X and Y can lie between —32768 and +32767. After a сай to OFFSET 
the lower left corner of the screen corresponds to the point (X,Y). 


CAUTION: graphics already drawn prior to a call to OFFSET are 
unchanged. 


10 CALL "'RESOLUTION",0O,2 


20 CALL "OFFSET",-160,-96 


places the origin (0,0) in the centre of the screen. 


PLOT 


Forms: 


Purpose: 


Remarks: 


Example: 


HRG ROUTINES — REFERENCE SECTION 


CALL "PLOT", ХА. Уат 
CALL "PLOT",X,Y 


To plot a point on the screen of intensity I at coordinates (X, Y). 


X and Y can lie in the range —32768 to +32767. However a point will 
only be displayed if its XY coordinates lie within the screen limits 
defined by RESOLUTION and OFFSET. The point (X,Y) is 
remembered and can be used as the start point of a line. 


I determines the ““logical” intensity of the point. Allowable values of I 
depend on the resolution and number of bits/pixel (see 
RESOLUTION). For example, in mode HR2 where 4 intensity values 
are available, the absolute value of I can range from 0 to 3. 


If I is positive, the new intensity value replaces the old contents of the 
graphics memory at that point. If negative, the new value written to 
the graphics memory is the exclusive-OR of the old value and the 
absolute value of I. A point plotted in this way is reversible by a further 
call to PLOT with the same negative value of I. 


If Lis 16, the XY coordinates are updated but no point is displayed. An 
intensity of 16 corresponds to а "реп up” move on a plotter. 


If I is omitted the value last specified in a call to PLOT, LINE or FILL 
is used. After RESOLUTION this value is zero. 


10 CALL "PLOT",100,50,? 


plots a point of intensity 2 at (100,50). 
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RESOLUTION 


Form: 


Purpose: 


Remarks: 


Example: 


16.12 


CALL "RESOLUTION",R,B 


To select high, medium or extra high resolution and to set up the 
number of bits/pixel. 


RESOLUTION initializes the graphics hardware and clears the screen. 
R may take the value 0, 1 or 2 corresponding to high, medium or extra 
high resolution; В sets the number of bits/pixel. The following 


combinations of R and B are allowed: 


В В Mode Pages Views Intensities 


0 2 HR2 1 1 4 
0 1 HRI 1 2 2 
1 4 MR 2 1 16 
1 2 MR2 2 2 & 
11 MRI 2 4 2 
2 1 EHR 1 1 2 (4807 only) 


where HR2 stands for “High Resolution, 2 bits/pixel’’ and so оп, and 
page, view and intensity are defined at the beginning of this chapter. 


After a call to RESOLUTION the lower left corner of the screen 
corresponds to the XY coordinates (0,0). In high resolution modes the 
upper right corner is (319,191); in medium resolution modes it is 
(159,95); in extra high resolution it is (639, 191). (These can be changed 
by calling OFFSET.) 


RESOLUTION initializes the ‘“memorised’’ XY coordinates which are 
used as the start point of a line to (0,0). 


ТО CALL "'RESOLUTION",O,2 


sets high resolution mode with 2 bits/pixel. 


SETCOL 


Forms: 


Purpose: 


Remarks: 


Example: 
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CALL "SETCOL",I,N 
CALL "SETCOL",I,R,G,B 
CALL "SETCOL" 


To modify the values held in the memory-copy of the colour lookup 
table without affecting the table itself (see also VIEW and Appendix 
Е). 


The SETCOL call sets up a value т the copy of the colour lookup table 
that is held in memory. This copy is transferred to the hardware table 
by calling VIEW. This is in contrast to the COLOUR call which both 
modifies the copy of the table held in memory and loads the hardware 
table, assuming the page and view currently selected by DISPLAY. 


SETCOL thus allows the display of non-standard combinations of 
views (for example, in HR1, of the differences between view 0 and view 
1). It also allows the loading of the colour lookup table to be deferred 
until all colours have been set up. 


І is the logical intensity to be modified and should be between 0 and З in 
high resolution and 0 and 15 in medium resolution. In extra high 
resolution this CALL will have no effect. 


The first form of the call with two arguments is used for black and 
white. N can range from 0 (black) to 255 (white). The second form with 
four arguments is for colour. On а 4807, values of 4,5,6 or 7 turn the red 
or green colour on, whereas values 0,1,2 or 3 turn the red or green colour 
off. On a 3807, the value specifies the colour intensity (Ofor colour off) 
with 7 representing the highest intensity. Parameter B may take any 
value between 0 and 3. On a 480Z a value of 2 or 3 will turn the blue 
colour on and 0 or 1 will turn the blue colour off. On a 380Z the value of 
parameter B specifies the blue colour intensity. Giving R, G and B 
values of 0 will generate black and giving R and G values of 7 and B a 
value of 3 will generate white. On a 480Z system, combinations of red, 
blue and green will generate the three colours yellow, magenta or cyan. 
The third form with no arguments restores the default values set up by 
RESOLUTION. 


10 CALL "RESOLUTION'',1,4 
20 DATA ..specifying 16 colours 
30 FOR 1=0 TO 15 

40 READ М 

50 CALL "SETCOL",I,N 

60 NEXT I 

ТО CALL "МІЕМ",О 


sets mode МВА, then loads the colour lookup table to display page 0, 
the view being determined by the DATA statement. 
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UPDATE 


Forms: 


Purpose: 


Remarks: 


Example: 
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CALL "UPDATE",P,V (all modes) 
CALL "UPDATE",V (HR 1) 
CALL "UPDATE",P (MR 4) 


To make page P, view V accessible for modification by PLOT, LINE or 
FILL. 


In mode HR2 and EHR there is only one page and view and this callis 
not used. In all MR modes there are two separate pages, numbered 0 
and 1. In modes HR1 and MR2 there are two views, numbered 0 and 1, 
and іп mode МЕ] there are four views, numbered 0 to 3. 


After a call to RESOLUTION, page 0 view 0 is selected for update; that 
is, accessible to PLOT, LINE and FILL. Calling UPDATE changes the 


page and/or view that is accessible. Similarly, calling DISPLAY selects 
the page and view that is displayed. 


P may be omitted in mode HR1 and V in mode МВА. 


10 CALL "RESOLUTION,1,1 
20 CALL "UPDATE",1,3 


set mode MR1, then select page 1, view 3 for update. 
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VIEW 


Forms: 


Purpose: 


Remarks: 


Example: 


HRG ROUTINES — REFERENCE SECTION 


CALL "VIEW",P (all modes) 
CALL "VIEW' (HR only) 


To load the colour lookup table with values set up in memory by 
SETCOL, allowing the selection of non-standard views (see also 
SETCOL). 


The VIEW call copies the colour lookup table from memory to the 
actual table on the HRG board and selects an MR page. The table in 
memory is initialized by RESOLUTION and modified by COLOUR 
and SETCOL. Use of SETCOL followed by VIEW allows the selection 
of non-standard views; it also allows the loading of the hardware table 
to be deferred until all colours have been set up. This CALL has no 
effect in EHR. 


The argument P is the medium resolution page required and should be 
О or 1. It may be omitted in modes HR1 and HR2. 


CAUTION: it is important to set up all four (HR) or sixteen (MR) 
intensity values by calling SETCOL before calling VIEW, otherwise 
undefined values will be loaded into the colour lookup table. This 
applies even in modes HR1 and МВ1, and is in contrast to calling 
COLOUR in these modes, where only intensities 0 and 1 can be defined. 


10 CALL "RESOLUTION",0,1 
20 DATA 0,200,200,0 

30 FOR 1=0 TO 3 

40 READ N 

50 CALL "SETCOL",I,N 

60 NEXT I 

70 CALL "VIEW" 


sets up НВІ, then loads the colour lookup table to display the 
differences between view 0 and view 1. 
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HIGH RESOLUTION GRAPHICS LEVEL 2 


The facilities described in this chapter are provided in Level 2 support of High 
Resolution Graphics (HRG) from Extended BASIC Versions 5 and 6. They are in 
addition to the Level 1 routines described in chapters 15 and 16. 


The additional features permit: 


— Dumping rectangular areas of the НВС screen to an Anadex DP 9501 printer 
ог an Epson MX type Ш/КХ/ЕХ series printer. 


— The enlargement and shading patterns may Бе one of a pre-defined set, or 
they may be user-defined. 


-- Plotting character-strings on the НВС screen in any of four orientations. 
— Copying one rectangular area of the НВС screen to another. 
— Reading the logical intensity of a point on the HRG screen. 


The first section of this chapter is a brief introduction to the new facilities of HRG 
Level 2. Then there is the main section of formal definitions which is layed out in the 
same way as in the previous chapter. Finally there are some example programs. 


INTRODUCTION 

Dumping to a printer 

NOTE: “x” denotes a spot апа “."' denotes a blank in this discussion. 

The colour/intensity of each point present on the screen is printed on the paper as a 
pattern of dots. This pattern of dots, known as a shading pattern, is normally chosen to 
give a similar ‘brightness’ to the pixel it is representing. For example, if the graphics 
screen is set to HR2 mode (RESOLUTION ',0,2), then four colours/intensities are 
possible. These are set up by default ranging from intensity 0 (dimmest) to intensity 3 


(brightest). So for this mode, we require 4 different shading patterns and we might use 
the following: 


intensity: 0 1 2 3 
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In this case, each time a pixel from the screen is printed, it is represented by one of the 
four shading patterns shown earlier. 


The CALL “PATSIZE” command is used to define what pattern size will be used for 
printing. Shading patterns can be defined using a call to the SHADING routine. 


HRG characters 


The “normal” ASCII characters displayed on the computer screen are generated by 
circuitry contained on one of the boards in the computer (the video controller board). 
The characters making up the text are normally called ‘hardware characters’. The high 
resolution graphics board can also produce textual information using the STPLOT 
function. In this case the characters are defined by software, so they are called 
‘software characters’ ог ‘HRG characters’. Ап HRG character is displayed by filling 
pixels on the HRG screen to make up the shape of the character. 


When you switch on, this software character set is loaded into RAM; the characters 
are very similar to the 32 special characters and 96 ASCII characters of the hardware 
characters (see Appendix B of the 480Z Users Guide). The software characters may be 
accessed with the CALL "ЗТРІОТ" command and the shape of any of them may be 
re-defined by the CALL '*DEFCHR'' command. 


NOTE: No call can be executed in HRG Level 2 unless the RESOLUTION routine 
has been called at least once since you loaded BASIC. 
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CHARSIZE 


Form: 


Purpose: 


Remarks: 


Example: 


CALL "CHARSIZE", XE,YE 


To define the magnification of the characters to be displayed by a call to 
the STPLOT routine. 


The XE argument of a call to the CHARSIZE routine defines the 
magnification in the X-direction. The YE argument defines the 
Y-direction magnification. Both XE and YE must be in the range 1 to 
255. 

A value of zero will produce the error message: 


Illegal arg 


The value of XE and YE are reset to 1 on any call tothe RESOLUTION 
routine. 


Try adding the line: 
25 CALL "CHARSIZE", 3, 3 


to the example program given in the DUMP definition. 
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COPY 


Form: 
Purpose: 


Remarks: 


Example: 


17.4 


CALL. "COPY", X1, Y1, Хе, Y2, Хр, YD 

To move a copy of a rectangle from one area of the screen to another. 
A call to the COPY routine moves a copy of the rectangle defined by 
lower left corner (X1, У1) and upper right corner (X2,Y2). the 
destination of the copy is defined by the lower left corner (XD,YD). 
If any of the coordinates X1, Y1, X2 or Y2 are outside the area of the 
screen for the current resolution, then they will be adjusted so that any 


value outside is placed in range. 


Note that the COPY routine works with the view/page that is currently 
being updated, not necessarily the view/page that is being displayed. 


In HR mode, the following statement: 


CALL "COPY", 220,20,120,80,120,100 


moves a copy of the rectangle upwards and to the right. 
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DEFCHAR 


Form: 


Purpose: 


Remarks: 


Example: 


CALL "DEFCHAR",C,B1,B2,B5,B4,B5,B6,B7,B8 


То define the characters to be displayed by a call to the STPLOT 
routine. 


The C argument of the call to the DEFCHAR routine is the ASCII 
value (in the range 0 to 127) of the character to be defined. 


The arguments B1 to B8 are the bytes that make up the character. B1 
refers to the top row of the character, B2 to the second, B3 to the third, 
and so on. 


The decimal values of B1, B2, ...., B8 are converted to binary numbers. 
For example, the decimal 8 is converted to the binary 00001000. Any 
bit set at 1 is converted to a displayed dot. Any bit set at zero is 
converted to a blank. The least significant binary digit is on the right. 


CALL "DEFCHAR, А5С("."),3,4,8,8,8,8,16,96 


Redefines the full stop character to an integral sign. 


Decimal Binary Character 
B1 5 00000011 ...... XX 
B2 4 00000100  ..... X s 
B3 8 00001000 Rp desa sa 
B4 8 00001000 OD IPS 
B5 8 00001000 ans Ж 
B6 8 00010000 NS рар 
B? 16 00010000 end uus 
B8 96 01100000 „А CEDE 


Two further examples of character definition are: 


CAPITAL 'A' 

Decimal Binary Character 
B1 24 00011000 ра Ань 
вг 56 00100100 Жа Жа 
B3 66 01000010 „Хез 
В4 66 01000010 uo RU) dE 
B5 126 01111110 .XXXXXX. 
B6 66 01000010 "P СРНА ON 
B? 66 01000010 T Сериите св 
B8 66 01000010 E quU 
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Decimal 


DOLLAR SIGN 
Binary Character 
00000000  ..... сата 


00001000 ME susta 
00111111 ..ХХХХХХ 
01001000 «Хо 


00111110 
00001001 оре ъ s X 
01111110 .XXXXXX. 


00001000 ica y ET 
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DUMP 
Form: CALL "DUMP", X1, Y1, X2, Y2, [,D] 


Purpose: To copy а rectangle of the screen to the printer. 


Remarks: The rectangle to be copied is specified by the bottom left corner (X1, 
Y1) and the top right corner (X2, Y2). 


The fifth parameter, D, is optional and determines the method of 
printing. The rectangle can be printed either across the paper or along 
the paper, depending on the value of D. Its value also determines 
whether the background colour on the screen will be printed as black or 
white. White is the default colour. If black is chosen then all the 
shading patterns will be reversed: 


D=0 — Causes the x-axis to be in the direction of paper travel with 
the background colour printe as white. (the reverse of what 
is shown on the screen) This is the default method. 


D=1 — Causes the x-axis to be across the width of the paper with 
the background colour printed as white (the reverse of 

Lm what is shown on the screen). | 
D=2 —  Causesthe x-axis to be in the direction of the paper travel 


with the background colour printed as black. 


D=3 —  Causesthe x-axis to be across the width of the paper with 
the background colour printed as black. 


Note that the DUMP routine works with the view/page that is 
currently being updated, not necessarily the view/page that is being 
displayed. 


Before you attempt to make a copy, ensure that: 


1) there is a suitable printer attached to the 3807/4807. Suitable 
printers are Anadex 9501 and Epson MX type III/RX/FX series 
printers 


2) you have set up the printer option with the BASIC PRINTER 
command (and, if on a network, have selected either NETWORK 
PRINTER or LOCAL PRINTER) 


3) you have selected the correct printer with the CALL 
“PRINTER” command (see below) 
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Indications that the printer has not been set up correctly are: 


е A large number ої ‘3’ signs produced on the screen. 


° Output of control codes to the screen and the beeper sound. 


е A large number ої ‘9’ signs produced on the printer. 


If you are on a network you may find it advisable to select LOCAL PRINTER before 
calling DUMP. This will avoid generating very large spooler files, which typically will 
not fit on the disc. If you must use a network printer, we recommend that you do not 
use a pattern size greater than 1X1. | 


Note also that if dumping over a network the output may be incomplete or incorrect, 
with blank lines occasionally inserted. This is due to the way the network spooler 
interprets some of the control codes which are to be sent to the printer. This applies 
particularly to users of Epson printers. 


Example: The following program is a simple example of dumping a picture (the 
CALL “PRINTER” command is defined later in this chapter): 


5 PUT 12 :REM Clear the screen of text 
10 PRINTER 3 :REM Select parallel printer 


20 


REM - change above line to 
REM suit your printer 

CALL "RESOLUTION" ,0О, 2 

CALL "PRINTER',1 :REM Select EPSON 


REM printer, or change to 
REM CALL "PRINTER",O for 
REM an ANADEX printer 

ITEN=0 

REM --------------- 

FOR Ү=0 TO 120 STEP 30 


CALL "FILL",0,Y,30,Y*28,ITEN 
ITEN = ITEN+1 

NEXT Y 

REM --------------- 

CALL "DUMP",0,0,30,120,0 
CALL "CLEAR" 


NL 
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Form: 


Purpose: 


Remark: 
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CALL "PATSIZE", Р, @ 


To define a pattern size to be used for each point from the screen when 
dumping to the printer. 


The size of each shading pattern, and hence the size of the printed 
picture can be changed with a call to the PATSIZE routine. The 
argumets, P and Q, give the size of the shading pattern; P is the x 
component and Q is the y component. The maximum value for both P 
and Q is 6. 


If no call to the PATSIZE routine is made, then a default size and 
pattern (related to the current resolution) is used: 


Resolution Maximum Number Default size of 
of logical shading pattern 
Intensities 
0,2 4 3x3 
0,1 2 3x3 
1,4 16 4x4 
1,2 4 3x3 
124 2 3x3 
2,1 2 3x3 


and any call to the RESOLUTION routine will produce a size and 
pattern according to this table. The default pre-defined shading 
patterns are shown below. 


There are other pre-defined shading patterns which are automatically 
selected when the following values of P and Q are chosen: 


Maximum number of Sizes of shading pattern 
Logical intensities which have pre-defined patterns 
2 1x1 
2x2 
3x3 (default) 
4x4 
4 2х2 
3x3 (default) 
4х4 
16 4x4 (default) 
6x6 


Any other values of P and Q will give shading patterns of blanks and 
the previous shading patterns will be lost. New shading patterns can be 
defined using a call to the SHADING routine. 
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Pre-defined shading patterns 
With 2 logical intensities: 


Colour 1 will be no dots. Colour 0 will be all dots printed in the 
matrix 


With 4 logical intensities: 


Pattern size 2X2 
Intensity 0 1 2 3 
= А . X хх 
| X .X XX 
Pattern size 3X3 
Intensity 0 1 2 5 
-— „Ж XXX XXX 
s is X.X X.X XXX 
а „Хх. ххх XXX 
Pattern size 4X4 
Intensity 0 1 2 3 
са. «ХХ» ХХХ ХХХ 
—— X..X X..X XXXX 
зе X..X X..X XXXX 
.... .XX. XXXX хххх 
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With 16 logical intensities 


Pattern size 4x4 
Intensity 0 1 2 3 
- - = = е X - - - x - - x 
а = е = е е - x = x - - = = 
е = = = - - м з X LÀ - = = = 
е = е = X ° = е е = е x - е x 
4 5 6 7 
‚хх. X..X XX. . X 
x е е °. x е “< = е е X X е x 
X..X . X. X... X..X 
о X..X X.XX „Ххх. 
8 9 10 11 
X.XX XX.X XX.X XXXX 
“ъй X..X X.XX X..X 
х.. х..Хх „Хх. X..X 
XXXX X.XX XX.X XXXX 
12 13 14 15 
XXXX XXXX XXXX XXXX 
X..X XX.X X.XX XXXX 
XX.X X.XX XXXX XXXX 
mm. XXXX XXXX XXXX XXXX 
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Example: 


17.12 


Note that a small pattern size must be used when using an 80 column 
width printer as a full screen dump will not fit on the paper with larger 


sizes. 


Pattern size 6x6 


Intensity 


XXXXXX 
Хх... .Х 
ХХ... .Х 
Хх... .Х 
Х... Х 
ХХХХХХ 


12 


XXXXXX 
X.XX.X 
XX.XXX 
XXX.XX 
X.XX.X 
XXXXXX 


The following statement: 
CALL "PATSIZE",$,5 


will define the pre-defined 3x3 patterns (with 4 logical intensities) as the 


XXXXXX 
Х....Х 
X.XX.X 
X.XX.X 
Х....Х 
XXXXXX 


15 


XXXXXX 
XXXXXX 
XX..XX 
XX..XX 
XXXXXX 
XXXXXX 


. ХХХХ. 
Х....Х 
.Х..Х. 
«Х..Х. 


- ХХХХХ. 


Х....Х 


10 


ХХ. „ХХ 
X.XX.X 
«ХХХХХ 
ХХХХХ. 
“Х..Х. 
XX..XX 


14 


XXXXXX 
X.XXXX 
XXXXXX 
XXXXXX 
XXXX.X 
XXXXXX 


ones to be used when dumping to the printer. 


11 


XXXXXX 
XX..XX 
X.XX.X 
X.XX.X 
XX..XX 
XXXXXX 
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XXXXXX 
XXXXXX 
XXXXXX 
XXXXXX 
XXXXXX 
XXXXXX 
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PRINTER 

Form: CALL "PRINTER", ТС, W] 

Purpose: To define which type of printer will be used for output. 

Remarks: The CALL“PRINTER” command enables output to either ап Anadex 

.. DP9501 printer or an Epson MX-type III/RX/FX printer. The first 
argument, T, defines the printer type. If T is 0, an Anadex is to be used; 
if T is 1, an Epson is to be used. The default is Т=0 (Anadex). 
The optional second argument, W, defines the print mode. When using 
an Anadex, this argument has no effect, but with an Epson printer the 
following applies: 
W = 0 Normal density bit image print 


W = 1 Dualdensity bit image print, half the width of normal 
density 


The default is W = 0 (normal density) 


Example: Seethe example program in the DUMP definition. 
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RDOUT 
Form: 


Purpose: 


Remarks: 


Example: 
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CALL "RDOUT", X, Y, VARADR(V) 


To read the logical intensity at a point on the screen and to return this 
intensity in the variable V. 


The CALL "RDOUT" function is similar to the BASIC low resolution 
graphics function, POINTS. The logical intensity at the point given by 
X and Y will be returned in the variable, V. 


Note that the RDOUT routine works with the view/page that is 
currently being updated, not necessarily the view/page that is being 
displayed. 


CALL "RDOUT", 30, 30, VARADR(V) 


returns the logical intensity of the specified point on the screen in the 
variable, V. 


pa n, 
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SHADING 


Form: 
Purpose: 


Remarks: 


Example: 


CALL "SHADING"', I, VARADR(A$) 

То define a shading pattern for a logical intensity, I. 

The second argument contains the shading information in A$, which is 
divided into groups of characters (0 and 1). For example, in a 4x4 
shading pattern, A$ is divided into four groups of four characters. 


Each group corresponds to one row of the shading pattern. The left 
group is the top row and the right group is the bottom row. The left 
character in each group is the left position of that row. 


An error message is produced if the string length is incorrect for the 
current shading patern size (Invalid Pattern Length) if any element of 
the string is not 0 or 1 (Illegal Shading Pattern), or if I is not a possible 
logical intensity for the current resolution (Illegal argument). 


A shading pattern is lost whenever a call to a RESOLUTION or 
PATSIZE function is made. 


As an example, 
АФ2"0001001001001000" 
gives the following shading pattern: 
„хо “xX” denotes a spot 
| E : “.’’ denotes a blank 


X. о е 


So 0 represents а blank and 1 represents a spot. 


17.15 


HRG LEVEL 2 GRAPHICS 


STPLOT 


Form: 
Purpose: 
Remarks: 


Example: 


17.16 


По 


CALL "STPLOT", X, Y, VARADRCAS), ТГ, 0) 
To display a string of characters on the screen 


The first two arguments, X and Y, define the starting point at which 
the string, A$, will be displayed. The argument, I , is the logical 
intensity, and the optional argument, D, is the direction in which the 
string will be plotted: 


D-0 normal horizontal characters (this is the default value) 
D-1 sidways up the screen 

D=2 upside down 

D=3 sideways down the screen. 


If a character in the string is outside the range 0-127, it will be folded 
back into that range. For example, a character with ASCII value 255 
would be mapped onto 127. A direction outside the range 0-3 is folded 
back. 


5 REM Display text with HRG character set 
10 PUT 12 
20 CALL "RESOLUTION", O, 2 
30 AS$=""HELLO WORLD"! 
40 CALL "STPLOT", 30, 30, VARADR(A$) ,3 
displays: 

HELLO WORLD 


on the screen 
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EXAMPLE PROGRAMS 


1) EXCOPY 


This simple program is designed to show the speed of the COPY function. 


10 REM EXCOPY 
20 PUT 12 
30 CALL "RESOLUTION", 0, 2 
40 CALL "FILL", 0, 0, 40, 40, 3 
p 50 CALL "FILL", 8, 8, 32, 32, 0 
| 60 CALL "FILL", 17, 17, 36, 26, 2 
70 FOR J=30 TO 150 STEP 30 
80 CALL "COPY", J-30, J-30, J+10, J+10, J, J 
^^“ 90 NEXT J 
100 END 


2 SINE 


This program plots and labels a sine graph, showing some of the features of 
the STPLOT function. It then prints the graph on the printer, with a white 
m. background. The x-axis runs across the width of the paper, and a pattern size 
Po of 2X2 with default shadings is used. If you are using a network then we 
suggest that you use a local printer. 


ro 3 LOCAL PRINTER 3 :REM Change this Line to 
5 REM suit your printer 
10 REM SINE shows a use of STPLOT, 
15 REM and demonstrates DUMP. 
20 PUT 12 
30 LET X$="X" : LET Ү$="у" 
40 LET A$z" " : LET PS=CHRS(21) 
m 50 REM P$ is the HRG character pi. 


60 LET P2$z"2"«P$ : LET P3$="3"+P$ 

70 LET I$z'"1" : LET 11%="-1" 

80 CALL "RESOLUTION" , 0,1 

85 CALL "PRINTER'",1 :REM Change this line to 


86 REM CALL "PRINTER",O for 
87 REM ап ANADEX printer. 
90 CALL "OFFSET", -8, -96 

100 REM plot sine wave. 


110 LET A=16*ATN(1)/318 
120 FOR X=0 TO 318 

130 LET Y=50*SINCA*X) 
140 CALL "PLOT", X, Y, 1 
150 NEXT X 
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160 REM plot and label axes. 

170 CALL "PLOT", О, -96, 0 

180 CALL "LINE", O, 96, 1 

190 CALL "STPLOT", -4, 88, УАКАРВ (А$), 1 
200 CALL "STPLOT", 8, 88, VARADRCYS), 1 
210 CALL "PLOT", O, O, | 

220 CALL "LINE", 311, O, 1 

230 REM Line 240 plots "?" on its side. 
240 CALL "STPLOT", 303, 4, VARADR(A$), 1, 3 
250 CALL "STPLOT", 302, 8, VARADR(X$), 1 
260 REM Draw a heading and mark points 
265 REM on each axis. 

270 LET B$z'"Graph of y=sin x" 

280 CALL "STPLOT", 3, 70, VARADR(B$), 1 
290 CALL "PLOT", -2, 49, 0 

300 CALL "LINE", 2, 49, 1 

510 CALL "STPLOT, 5, 45, МАВАР”РВ (1%), 1 

520 CALL "PLOT", -2, -50, O0 

550 CALL "LINE", 2, -50, 1 

540 CALL "STPLOT", 5, -53, VARADR(IT1$), 1 
550 CALL "STPLOT", 79, 4, VARADR(P$), 1 
560 CALL "STPLOT"', 2*79-16, 4, VARADR(P2$), 1 
370 CALL "STPLOT", 3*79, 4, VARADR(P3$), 1 


380 REM Set the shading pattern size to be 2x2 

590 CALL "PATSIZE", 2, 

400 REM Dump the screen to the printer. 

405 REM Assumes correct type has been set up. | 


410 INPUT "Press «RETURN? when ready to dump",A$ 
420 CALL "DUMP", -8, -96, 310, 95, 1 
450 END 
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CHAPTER 18 


MACHINE AND ASSEMBLY LANGUAGE 
SUPPORT 


This chapter is mainly of interest to those who wish to add machine-language routines 
to BASIC for special requirements. Reasonable familiarity with Z80 Assembly 
Language is assumed. 


Extended BASIC has some features which allow direct access to main memory during 
the execution of BASIC programs. Control can be passed to machine-language 
routines to perform special functions. An example of this is the use of the CALL 
command to add support to BASIC for high resolution graphics (see chapter 15). 


Small routines can be put into memory from within BASIC programs using the POKE 
command. Larger routines, developed with a Z80 Assembler, can be loaded from disc 
files. When running BASIC programs, the USR and CALL commands allow the 
BASIC interpreter to pass control to these machine-language routines to perform 
special requirements. 


The first part of this chapter gives details of the 380Z and 480Z memory layout. 
Guidance is given about the areas of memory that should be used for storing machine- 
language routines that will be called from BASIC programs. The next section defines 
the available BASIC commands, which are: 


PEEK — return the contents of a memory location 
POKE — store a value in a memory location 

INP — return a value from an input port 

OUT — send a value to an output port 

WAIT — wait for an input status bit 

VARADR — return the address of a variable 

USR — call a user-supplied function 

CALL — call a user-supplied routine. 


The last part of the chapter gives instructions on machine-language initialization and 
on adding and saving machine-anguage routines; some examples of machine- 
language routines and useful BASIC programs are provided. 


When a requirement does arise that cannot be met by the BASIC language, you are 
urged to use the mechanisms described in this chapter. Do not attempt to modify the 
BASIC interpreter itself; this will lead to programs that will be difficult to share with 
other users. Programs from modified interpreters cannot be maintained if the 
interpreter is changed. You are reminded that the Research Machines software licence 
agreement restricts the use of the licenced software to a single computer. You break 
this agreement if you give a colleague a program plus a modified interpreter. 
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MEMORY LAYOUT 
Memory 380Z Addresses 480Z Addresses 
Contents 32K 48K 56K 32K 64K 


FFFF FFFF FFFF FFFF FFFF 


|WORKSPACE 


| COS(380Z) / ROS(480Z) 


FOOO F000 F000 F800 F800 


E000 E000 E000 E800 E800 


AREA A 


| OPERATING SYSTEM :- 
CP/M (Stand-alone) 
CP/NET (Network + disc) 
CP/NOS (Network) 


STACK & STRING SPACE 


WORKSPACE 


(BFF BBFF DFFF ТАРЕ ЕТРЕ 


0100 0100 0100 0100 0100 
OOFF OOFF  OOFF OOFF OOFF 


0000 0000 0000 0000 0000 
All addresses are hexadecimal. 


Addresses in the above diagram that appear too high for the specified memory size are 
mapped to the appropriate locations. 
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WHERE TO PUT MACHINE-LANGUAGE ROUTINES 


A machine-language routine that is to be called from BASIC may reside in one of three 
areas, designated A, B, and C in the memory map diagram. 


Area A isa block of memory immediately above the operating system, and is normally 
of zero size. On a stand-alone system the MOVCPM and SYSGEN programs can be 
used, if required, to move the operating system down (by 1K increments) and so to 
reserve space for user-supplied subroutines. For example, the command: 


A>MOVCPM 30 * 


in a 32K 3807, followed by SYSGEN, would generate a 30K operating system and 
make available memory at addresses 7800 to 7BFF hex. User-supplied routines can be 
installed in this area by POKE commands, or by using the DDT program before 
starting BASIC. The MOVCPM, SYSGEN and DDT programs are described in the 
relevant User Guide. 


Area B is at the top of the area available to BASIC, immediately below the operating 
system, and is termed the cache memory. Cache memory is reserved from within a 
BASIC program by means of the CLEAR command (see chapter 6). Machine language 
routines can be placed in this area only by the use of POKE commands. A way of 
finding the address limits of cache memory is given below. 


Area C is between the BASIC interpreter and the BASIC program area. Any user- 
supplied machine-language routines (debugged) that are required to be loaded with 
BASIC should be installed in this area. 


In general, small routines that are put in memory from BASIC with the POKE 
command should be stored in cache (Area В). Larger routines that are developed witha 
Z80 Assembler should be tested in Area A. If you want them to become a permanent 
part of BASIC, you must re-assemble them for Area C then load them with BASIC 
(details of linking machine-language routines are given later in this chapter). 


Finding the address limits of cache memory 


The start of cache is found from ENDMEM, which contains the address of the last 
byte of RAM used by BASIC, and HIMEM, which contains the address of the first 
byte of the operating system. Thus the current size of cache memory is given by 
(HIMEM)—(ENDMEM)—1 where parentheses mean ''contents of”. 


ENDMEM is normally found in locations 011C and 011D hex, but check the actual 
address as given in the Release Note. 


HIMEM is found in locations 0006 and 0007 hex. 
The following program displays the current start address and size of cache memory, 


the size of string space, and the amount of free memory remaining (the PEEK 
command is defined below): 
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10 LET EM=PEEK(&11C)+256*PEEK(&11D) 
20 LET HM=PEEK(6)+256*PEEK(7) 

30 PRINT "CACHE START ="; EM+1 

40 PRINT "CACHE SIZE ="; HM-EM-1 

50 PRINT "STRING $РАСЕ="; FRECX$) 
60 PRINT "FREE MEMORY ="; ЕВЕСХ) 


You may find it interesting to run this program a number of times, issuing different 
forms of the CLEAR command between each run. 


FUNCTION AND COMMAND DEFINITIONS 
PEEK 10 LET A=PEEK(B) 


This function returns the contents of the memory location at the 
address specified by the argument. The argument must lie in the range 
0 to 65535 (0 to FFFF hex). The function returns the contents as an 
8-bit binary number which lies in the decimal range of 0 to 255. 


POKE 10 РОКЕ A, O 


The POKE command stores its second argument in memory at the 
address specified by its first argument. The stored second argument 
must be in the range 0 to 255 (0 to FF hex); the first address argument 
must be in the range 0 to 65535 (0 to FFFF hex). The example in the 
heading stores 00 hex (the no operation instruction, NOP) at address A. 
Another example of the use of the POKE command is given in the 
definition of the CALL command. 


The POKE command is best used in conjunction with the cache 
memory, where small machine-language routines can be stored. cache 
memory can also be used to preserve integer values between programs. 


INP LET У = INPCP) 


This function returns the contents of the input/output (I/O) port 
specified by the argument. The port address must lie in the range 0 to 
65535; an 8-bit binary value is returned (0-255). The example reads 
value V from port P. Memory-mapped ports cannot be accessed. 


Useful port addresses are provided in the relevant Information File 
(3807; ог 4807). 


18.4 


OUT 


WAIT 


MACHINE & ASSEMBLY LANGUAGE SUPPORT 


OUT P, V 


The OUT command writes the 8-bit binary value (in the decimal range 
of 0 to 255) of its second argument to the I/O port specified by the first 
argument (which must be in the range 0 to 65535). The example writes 
value V to port P. Memory-mapped ports cannot be written to using the 
OUT command. 


WAIT P, M, X 


The WAIT command causes BASIC to pause until a specified bit 
pattern is read from an I/O port. The first argument specifies which I/O 
port must be read; the second argument specifies which bit or bits must 
be tested; the third argument specifies that BASIC must wait as long 
as the specified bit(s) are set to this argument. The third argument can 
be omitted, in which case zero is assumed. 


The first argument must lie in the range 0 to 65535. The second and 
third arguments must be in the range 0 to 255. The example tests port 
P and makes BASIC wait while the bit(s) specified by M remain in state 
X. 


You must think of M and X as eight-bit binary numbers. For example, 
if M is decimal 2, it is written in binary notation as 00000010. This 
specifies that bit 1 must be tested (bit 0 is on the right and bit 7 is on the 
left). The statement: 
10 WAIT &E9, 2 

makes BASIC wait as long as binary bit 1 of port E9 is at zero. When 
bit 1 changes to 1, BASIC continues. The third argument was omitted, 
so zero was assumed. Conversely, the statement: 


10 WAIT &E9, 4, 4 


waits as long as binary bit 2 of port E9 is set at 1. When it becomes zero, 
BASIC continues. 


(The mechanism involves Boolean operations: read the port; exclusive 
OR its contents with X; AND the result with M; repeat until the result 
is non-zero) 

If necessary, more than one bit can be tested simultaneously. 

For example: 


10 WAIT &C9, 3, 2 


makes BASIC wait while bit 0 is zero and bit 1 is one. When either bit 0 
or bit 1 changes, BASIC continues. 
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VARADR 
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LET A=VARADRCV) 


The VARADR function returns the address of a variable (numeric or 
string), or an element of a numeric or string array. The example assigns 
the address of variable B to A. 


Binary Floating Point Notation 


In Research Machines Extended BASIC, numeric variables are held in 
four bytes using the binary floating point notation. The decimal 
number 0.5 is represented by the four-byte number: 


00 00 00 80 
fraction exponent 


The three left-hand bytes represent the fraction and the right-hand 
byte represents the exponent. 


The exponent is a power of 2; for ease of calculation, 128 (80 hex) is 
added to the exponent so that it is always positive. The fraction lies in 
the range 0.5 to 0.99...., so its most significant bit is always set. 
Therefore, this bit is not stored; instead the bit position is used to store 
the sign of the number, zero for a positive number and one for a 
negative number. The least significant byte of the fraction is on the left 
of the three bytes. The most significant byte is on the right (next to 80 
in the above example which can be translated to + 0.5EO0 or 0.5). 


Some further examples are: 


оо оо 80 80 =— 
00 00 40 8 0 =+0.75 
CF OF 49 8 2 =+ 3.14159 


If the exponent is zero, the number represents zero, whatever value the 
fraction has. 


For a numeric variable, each of the four bytes occupies a memory 
address. The VARADR function returns the address of the left-hand 
byte. The remaining bytes occupy the next 3 higher memory addresses, 
with the exponent byte in the highest address. 


For a string variable, the address returned by the VARADR function is 
that of а four-byte “description block” which gives information about 
the string. The first byte contains the string length (0 to 255 
characters), the second byte is always zero and the third and fourth 
bytes contain the address of the string (with the less significant byte 
first). 


The VARADR function can be used in a CALL or USR instruction to 
pass the address of a variable to a machine-language routine. 


" 1 


NL 


N 


USR 
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The latter can then return information to the BASIC program by 
modifying the value stored in the variable. 


CAUTION: The address of an array element will change whenever a 
simple variable is assigned to it for the first time. This is 
because BASIC stores simple variables below array 
variables in an adjoining list. 


Also, the actual address of the string in a string variable 
description block will change from time to time as BASIC 
re-organizes its string space. If a literal string has been 
assigned to the string variable, the address in the 
description block may point into the program text. 


For both these reasons you must never increase the 
length of a string in a machine-language routine, though 
you can decrease its length. 


LET У = USR(B) 


This function allows BASIC to obtain a value from an external user- 
provided, machine-language routine. The example returns a value from 
the machine-language routine. This value is assigned to V; an 
argument is passed to the routine in the variable, B. 


The transfer address must be set up before the USR function is called 
otherwise the error message ‘Шева! function” is displayed. This 
address must be set up at address USR (the address of this vector is 
given in the Release Note) which is the address of a jump instruction to 
your machine-language routine. 


The routine address must be placed in (vector +1) and (vector +2) with 
the less significant byte first. The routine does not have to use the 
argument passed to it. 


Within your routine, the value of the argument B can be obtained and 
converted to 16 bits by a call to address USRVF. On returning from 
this call, the value is in register pair DE. The user can return a sixteen- 
bit number to BASIC as the value of the USR function by loading it 
into register pair AB (register A containing the more significant byte) 
and calling address USRVT. Both these calls are optional; if no call to 
USRVT is made then the value returned is undefined. Finally control is 
returned to BASIC by a RET instruction (C9 hex). The code segment 
may modify any Z80 register. The addresses of USRVF and USRVT 
are given in the Release Note. 


The USR function is a relatively simple method of passing values 


between BASIC and machine-language routines. A useful example of 
the use of the USR function is given in the Examples section. 
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CALL 
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CALL A,V1,V2 CALL "ST16",V1,V2 


The CALL command is used to call a machine-language routine. 


The first numeric or string argument gives the address of the routine. 
This argument can be followed by any number of numeric arguments 
(separated by commas) which are converted to sixteen-bit integers 
available to the routine. In the above examples, two arguments, the 
current values of variables V1 and V2, are passed. 


If the first argument is a number, numeric variable, or numeric 
expression, the argument represents the address of the routine to be 
called (as in the first heading example). The only exception to this rule is 
that a call to address 0 is ignored because it is likely that the address 
variable has been cleared (after, for example, an EDIT command). 


If the first argument is a string constant, variable, or expression, then 
BASIC searches through a list of names of routines, supplied by you, 
for a match. This list of nodes is formatted as in the following example: 


DEFW NEXTNODE ;Pointer to the next node 


DEFB NAMELEN ;Length of the name 
DEFM "NAME' ;Name of the routine 
DEFW ROUTINE ;Address of the routine 
Т 
your names 


If a match is found, the routine is called; if no match is found, the error 
message “Name not found” is displayed and the program stops. 


The address of the first node must be placed in the symbolic location 
SUBPTR (the address of this location is given in the Release Note). In 
the last node, the pointer to the next node must contain the previous 
contents of SUBPTR. 


This node organization lets you add further routines without a 
knowledge of the other nodes. The chain of nodes must be followed from 
SUBPTR until the zero pointer is encountered. 


On entry to the routine, the values of the arguments following the first 
argument are on the Z80 stack. They may be popped (taken) off in 
reverse order. In the heading examples, V2 is popped off first. Register 
C contains the count of arguments in the stack; this count can be used 
by the routine to determine how many arguments to pop. 


In addition, register pair HL contains the address on the stack of the 
return address to BASIC, so the routine may either pop the correct 
number of arguments off the stack, or load the stack pointer from 
register HL (LD SP,HL), then perform a return from routine 
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instruction (RET) to return control to BASIC. Within the routine, any 
register may be modified. 


Returning values to BASIC with the CALL command is best 

accomplished by using the entry point SAVVAR (its absolute address 
is given in the Release Note). When called, SAVVAR converts the 
sixteen-bit quantity in register pair AB into floating point, and stores it 
in the variable whose address is in register pair HL. For example, the 


following routine: 

10 LET A=0 

20 CALL ADDR,A,VARADR(A) 

ADDR: POP HL *Address of А 
POP DE ;Value of А 
INC DE ‚даа one to A 
LD A,D 
LD B,E 
CALL SAVVAR ;Store it 
RET ;Back to BASIC 


assigns 1 to A. Note that SAVVAR destroys the contents of all the Z80 
registers. 


Examples of routines accessed by the CALL command are the High 
Resolution Graphics facilities, described in Chapters 15-17. 


MACHINE-LANGUAGE ROUTINE INITIALIZATION 


When BASIC is started up (by responding with BASIC to the A> prompt, for 
example), control is passed to the BASIC initialization procedure. During this 
procedure BASIC calls a further initialization procedure (INITSUB) which normally 
returns immediately to the BASIC initialization procedure. You may modify the 
INITSUB procedure to suit your own requirements. 


The INITSUB procedure occupies three memory locations. The first contains the Z80 
instruction, RET (C9 hex), and the second and third locations contain NOP 
instructions (00 hex). These instructions cause an immediate return to the BASIC 
initialization procedure. 


As previously mentioned, you may change these instructions. The usual modification 
is to set the three memory locations to contain a jump instruction followed by the two- 
byte address of the required machine-language routine. Such a routine might perform 
further initialization for an additional peripheral and indicate the presence of that 
peripheral. The version number message produced by the high resolution graphics 
(HRG) routines, for example, is produced in this way following an initialization test for 
the presence of the HRG board. 
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There are two distinct methods for returning to the BASIC initialization procedure 
from the machine-language initialization procedure: 


1. If the routines are attached to a version of BASIC with no other machine- 
language routines, then terminate your initialization procedure with a RET 
instruction. 


2. If there are already routines attached to BASIC which have modified the 
contents of the 3 INITSUB locations, then the machine-language initialization 
procedure should end by executing the previous INITSUB code. 


Below is an example of the instructions required to patch an initialization routine onto 
a BASIC program without any machine-language routines attached: 


ORG INITSUB 
JP BEGIN j;0n initialization jump to label BEGIN 


The above two instructions modify the contents of the three INITSUB locations. An 
example of a machine-language initialization procedure is given below. It uses the 
subroutine termination method (see 1. above): 


; Initialization Code starts here 


BEGIN: LD HL, INITMSG ;For example 
EMT MSG 


; Апу other initialization code 


RET Return to BASIC. 
ІТ the routine is being attached to 
га version of BASIC which already 
;has machine-language routines 
;attached, then the RET instruction 
;should be replaced by the 
‚содае originally at INITSUB 


ADDING AND SAVING 
MACHINE-LANGUAGE ROUTINES 
There is a utility program on the Extended BASIC distribution disc called 


CODE.BAS to provide easy linking of machine-code routines with the BASIC 
interpreter. The program produces a ZASM source listing with necessary ORG and 


EQU statements which will automatically “include” your source file(s) when running 


ZASM. If you have more than one routine to link into BASIC then arrange them in one 
or more files and enter their names into the CODE.BAS program as separate 
segments. 


A run of the procedure to link a routine is shown below. 
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Example: 


This example shows how to attach to BASIC the two routines TEST1 and TEST2 
which will be accessed from the interpreter by the commands CALL “ТЕЗТ1” and 
CALL “ТЕЗТ2”. The source code for these routines is held in the files 
BASTEST1.ZSM and BASTEST2.ZSM shown here: 


*H BASTEST1 


OUTC 
FFEED 


1 
12 


¿Routine to be attached to BASIC which clears 
¿screen leaving cursor at bottom left. 


START1:LD A,FFEED 
EMT OUTC 
RET 


*H BASTEST2 


OUTC 
US 


1 
31 


¿Routine to be attached to BASIC which clears 
¿screen leaving cursor at top left. 


START2:LD A,US 
EMT OUTC 
RET 


These files, together with DDT.COM, BASIC.COM, ZASM.COM and CODE.BAS 
are on the logged-on drive. The file produced by CODE.BAS is to be called 
SUBROUT.ZSM. 


A>BASIC CODE 


RML Extended BASIC V 5.0L 
Copyright (с) 1982 by Research Machines 


Output filename ? SUBROUT.ZSM 
Segment name ? TEST] (This is the name of the subroutine) 


Segment entry point 2 STARTI 
(The segment entry point is the label 
used within your source file to mark 
the address to which BASIC should jump 
when the routine is CALLed) 


Segment name ? TEST?2 


Segment entry point 7 START? 
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Segment name ? (No more, so just press RETURN) 


Module name 7 BASTEST1.ZSM 


Module name ? BASTEST2.ZSM 

Module name ? (No more, so just press RETURN) 
Ready: BYE 

A>ZASM SUBROUT 


ZASM 280 ASSEMBLER V3.0A 
Copyright (c) 1981 by Research Machines 


9BC7 bytes free 
No errors (Hopefully) 


A»DDT BASIC.COM 
DDT VERS 1.4 


NEXT PC 

nnnn 0100 
-ISUBROUT.HEX 
-R 

NEXT PC 

mmmm 0000 

-C 


A>SAVE xx NEWBASIC.COM 


Note: the value xx is obtained by subtracting 1 from the top two digits of hexadecimal 
number mmmm obtained after invoking DDT, then converting those digits into 
decimal. 


With this example the value mmmm given in DDT was 32F1H so the first two digits 
are 32H. Subtract 1 from 32H to give 31H. 31(base 16) equals 49(base 10), therefore the 
value xx in this case is 49. 

The file SUBROUT.ZSM should look like this: 


*Н BASIC CODE SUPPORT 


USR EQU 107H ;USR TRANSFER VECTOR 
USRVF EQU 109H USR VALUE FROM 
USRVT EQU 10CH ,USR VALUE ТО 

SAVVAR EQU 10FH ;SAVE INTEGER IN VAR 
OUTM EQU 112H ; РКТМТ MESSAGE 

Е. ЕКК EQU 115H ; ЕХТЕКМАС ERROR 
BBUFV EQU 118H ;ВАЗТС BUFFER VECTOR 
SUBPTR EQU 11AH ; SUBROUTINE POINTER 
ENDMEM EQU 11CH END OF MEMORY 

BRFCB EQU 11EH ,READ FCB 
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BWFCB EQU 120H :WRITE FCB 
DEFEXT EQU 122H :DEFAULT EXTENSION 
INITSUB EQU 125H ;SUBROUTINE INITIALIZATION 
CH.INPUT  EQU 128H :GET BYTE FROM CHANNEL 
me CH.OUTPUT EQU 12BH :РИТ BYTE TO CHANNEL 
ORG 282 
DEFW CODEO 
A m". ORG 118H 


DEFW ENDPATCH 
ORG 13010 


m CODEO: DEFW CODE1 
DEFB 5 
DEFM "TEST1" 
p DEFW START 
CODE1: DEFW CODE2 
DEFB 5 


DEFM "TEST2" 
DEFW START2 


CODE2 EQU 0 


*INSERT BASTEST1.ZSM 
*INSERT BASTEST2.ZSM 


M :END OF USER CODE 
P DEFB 0 
ENDPATCH: 


ren Note: The values given above may change with different versions of the BASIC 
interpreter. 


The last example is CAT, which prints a list of the names of the machine-code routines 
patched into the version of the BASIC interpreter on which CAT is running: 


10 DEF ЕМОСА)=РЕЕК (A) 4&100*PEEK(A*1) 
20 LET Ре811А : КЕМ SUBPTR 


30 LET Х=ЕМр (Р) : КЕМ NODE ADDRESS 

40 IF Х=0 THEN 140 : КЕМ LENGTH 

50 LET Р=Х 

60 LET | =РЕЕК (Р+2) : КЕМ LENGTH 

70 IF 1=0 THEN 120 

80 PRINT HEXSCFND(P+L+3)); " " :REM ROUTINE ADDRESS 


90 FOR 521 ТО і 

100 PUT PEEK(P+S+2) 

110 NEXT $ 

120 PRINT 

130 GOTO 30 

140 IF P=&11A THEN PRINT "Мо CALLs installed" 
150 END 
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Other Useful BASEPAGE Addresses 


E.ERR 


OUTM 
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This routine displays the message: 
External error 
and returns to BASIC. This error (number 1 in the list of BASIC errors) 


can be trapped by the ON ERROR command in the normal way. A 
machine-language routine must transfer execution to E.ERR by a 


jump instruction to generate the error. 


The OUTM routine can be used to output messages to the screen by the 
normal BASIC output mechanism. Such messages obey current 
settings set by the WIDTH and NULL commands. If CTRL/P has 
been entered, output will also go to the printer. 


The OUTM routine delivers a message from a table which you must 
define by tabulating the messages one after the other. The end of each 
message is indicated by setting (changing to 1) the last bit of the byte 
representing the last character. This can be done easily if you are using 
ZASM, the disc-based 780 assembler (available from Research 
Machines Limited). Simply insert the up-arrow character in front of the 
last character of the message: 


DEFM 'Магпіпта" 


This sets the top bit of the “g” byte. In effect, 80 hex is added to its 
ASCII value. 


Since the OUTM routine uses one of the 8 bits to indicate the end of a 
message, only 7 bits are available for character representation. Hence, 
it is not possible to output characters with ASCII values greater than 
127. Also, ASCII values of less than 32 (usually cursor control 
characters) cannot be used, except for 10 which gives carriage 
return/line feed. 


You must also define: 
• the address of the start of the table (in register HL) 


• the index number which points to the message that is to be 
output (in register E) 


An example of the use of the OUTM routine is provided in example 2 of 
this chapter. 


мои 
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BRFCB This address contains a pointer to the file control block for channel 10. 


BWFCB This address contains a pointer to the file control block for channel 10. 


| | CH.INPUT This routine reads a byte from a specified channel. It must be supplied 
with either: 
УМ Register А — Channel number to read from 
Flags — Carry flag set 
or: 
| Register pair ІХ — Pointer to channel I/O block (аз returned by 
P^ a previous call to this routine) 
Flags — Carry flag in reset state 
The second form should be used only after the first form has been used 
at least once. 
The routine returns: 
Register A — the byte read from the channel 
m Register IX — pointer to I/O block of the channel 
г 3 Carry flag — set for physical end-of-file, else reset 
and corrupts registers: AF BC DE HL IX 
For example, to read characters repeatedly from a file: 
LD A, 10 ; Channel 10 
ul. SCF ;Indicate to set up channel 


READ: CALL  CH.INPUT 


;Deal with character inRegister A 


XOR A ;Clearcarry flag 
JR READ 


CH.OUTPUT This routine writes a byte from to specified channel. It must be 


supplied with either: 
Register A — Channel number to write to 
Register C — Byte to write to the file 
Flags — Carry flag set 
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or: 
Register pair ГУ — Pointer tochannel I/O block (as returned by 
a previous call to this routine) 
Register C — Byte to write to the file 
Flags — Carry flag in reset state 


The second form should be used only after the first form has been used 
at least once. 


The routine returns: 
Register ТУ — pointer to I/O block of the channel 
and corrupts registers: AF ВС DE HL IY 


For example, to write characters repeatedly to a file: 


LD A,10 ;Channel number 

SCF ;Indicate to set up channel 
WRITE: LD С, <byte to write> 

CALL CH.OUTPUT 

XOR A :Сіеаг carry flag to 

;continued write 

JR WRITE 

EXAMPLES 


You may wish to try the two examples of machine-language routines and the two 
useful BASIC programs which are presented in this section. 


Example 1 


This example allows a printer option to be selected automatically from within BASIC. 
You could do this with the PRINTER command but, for educational purposes, this 
example does it with a machine-language routine. 


If you want to ensure that a Teletype printer is selected as the system printer before a 
BASIC program is run, a machine-language routine can be installed in cache memory 
using the POKE command. 


The Teletype is interfaced using a SIO-2 interface and it runs at 110 baud. The 
COS/ROS Monitor has an Emulator Trap instruction (EMT) called SETLST that 
selects a printer option automatically. Below is an Assembly Language routine which 
will call this EMT and select the SIO-2 at 110 baud: 


0029 = SETLST EQU 29H 

0000 3E02  5ЕТОРТ: LD A,2 :510-2 
0002 1ЕОО LD Е,0 :110 Baud 
0004 F729 EMT SETLST 

0006 C9 RET 

0000 END 
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Symbols: 
SETLST 0029 SETOPT 0000 
No errors 


This loads the A register with 2 to select the 510-2 port, loads the Е register with 0 to 
select 110 baud, calls COS/ROS with EMT SETLST and returns to BASIC. The 
routine can run at any address since it contains no address information. The machine 
code can be extracted (in hex) from the second column: 


ЗЕ 02 ЛЕ 00 F7 29 C9 


The routine can be installed in cache memory using the РОКЕ command; it can be 
called, by writing a BASIC program such as: 


ТО CLEAR 100,,10 :REM RESERVE SPACE 
20 DATA &3E,&02,8&1E,&00,8F7,8&29,&C9 
30 LET ЕМ=РЕЕК (&11С+56*РЕЕК (8110) 
40 LET CA=EM+1 

50 FOR I=0 TO 6 

60 READ V 

70 POKE CA+I,V 

80 NEXT I 

90 CALL CA 


Example 2 
The second example uses the USR and CALL commands. It gives BASIC the ability 
to store data in sixteen-bit integer arrays. 


Some dialects of BASIC have introduced a new data type, the integer numeric 
variable; this is often declared by following a variable name with a percent sign (for 
example A9%). Because of the overhead of interpretation, the addition of integer 
variables does little to speed up execution but provides the advantage of saving space 
where it is necessary to store a lot of numbers in memory. Integer variables normally 
occupy only two bytes, as opposed to the normal requirement of four. 


The following function and an associated routine allow numbers to be stored in cache 
memory as if they are in a one-dimensional integer array. 


We define the USR function as: 
LET V=USR(CA) 


where V is the content of integer array element A. The value of А is in the range 0 to М, 
where 2*(N- 1) is the size of cache. 


The companion CALL command is: 
CALL "ST16", V, A 
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which stores the value of V in integer array element A. Note that the range of V is 
limited to between —32768 and +32767 because only 16 bits are used for storage. 


Also included is the equivalent of array bound checking to ensure that only legal 
values of A are used. If a value of A is outside cache memory, then the error messages: 


Address out of bounds 
External error 


will be displayed and program execution will stop. This demonstrates the use of the 
OUTM facility to output a message through BASIC. An Assembly language version 
of the USR function and CALL command as defined above is: 


; GENERAL DEFINITIONS 
;PATCH is the old content of BBUFV 


;Note that any existing machine Language 
; routine will be overwritten 


0006 - HIMEM EQU 6 
0112 = OUTM EQU 112H 
0115 = E.ERR EQU 115Н 
0118 = ` BBUFV EQU 118H 
011C = ENDMEM EQU 11CH 
5124 - PATCH EQU 3124H 
0118 ORG BBUFV 
0118 8531 DEFW BASEND 
;LINKS TO USR FUNCTION 
0106 = USR EQU 106H 
0109 = USRVF EQU 109H 
010C = USRVT EQU 10CH 
0106 ORG USR 
0106 с32431 JP USR16 
;LINKS FOR CALL 
011A = SUBPTR EQU 11AH 
ОТТА ORG SUBPTR 
011A 3231 DEFW CLINK 
; SUBROUTINES PROPER 
3124 ORG PATCH 
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314A 
314B 
314E 
3152 
3153 
3154 
3156 
3157 
5158 
515С 
3150 
315F 
3160 
3163 


53543136 
3B31 


79 
РЕО2 
с21501 


29 
РА! 501 
ED5B1C01 


E5 
ED5B0600 
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;return variable from array 


USR16: CALL USRVF ;Get arg val into DE 
EX DE,HL ; Ага into HL 
CALL CHKCA ; Check address 
LD В, CHL) ;Get contents into 
INC HL ;reg AB 
LD A, CHL) 
CALL USRVT ¿Return as USR value 
RET 


;NODE FOR CALL 


CLINK: DEFW О ‚Мо more calls 
DEFB 4 ; Мате length 
DEFM "ST16' ;Мате of routine 
DEFW ST16 Pointer to routine 


;STORE VARIABLE IN ARRAY 


ST16: LD A,C ;Check no of args 
CP e 
JP NZ,E.ERR ; Еггог if not 2 
POP HL ;Get 2nd ага 
CALL СНКСА :Сћеск address 
РОР DE ;Get 151 arg 
LD (НС), Е ; 5тоге DE at address 
INC HL ;in HL 
LD CHL) ,D 
RET ;Back to BASIC 


; CHECK CACHE ADDRESS 


¿Convert array subscript to cache offset 
; Convert offset to address 
; Check that address is legal 


CHKCA: ADD HL,HL ;Double subscript 
JP C,EERR ;Illegal address 
LD DE, СЕМОМЕМ) 
INC DE ;Start of cache 
ADD HL,DE ¿Array element address 
JR C,ERROR ;Illegal address 
PUSH HL ;Save address on stack 
LD DE, CHIMEM) ;End of free КАМ+1 
DEC DE ; End of cache 
OR A ;Clear carry flag 
SBC HL,DE ¿Check upper bound 
POP HL ;Restore address 
JP NC,ERROR ;If illegal address 
RET Else address ОК 
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; OUTPUT ERROR MESSAGE AND JUMP BACK 
; TO BASIC. 


3164 1E01 ERROR: LD E,1 ;1st message in list 


3166 216F31 LD HL,ERRTAB ;Address of table of errors mom 
5169 CD1201 CALL OUTM ;Output error 
316С С31501 JP E.ERR Exit to BASIC with 

; External Error message 


;Table of error messages 

;Each error message must be terminated. 

;Wwith a character with the top bit set. = 
;Putting an up arrow (Т) before the last 

;character does this. 


ERRTAB: pc 
316F 41646472 DEFM "Address out of boundts'! 


;It is vital that the last byte of 
;BASIC is zero. The following ensures this. 


5184 00 DEFB O 
BASEND: 
0000 END 


5185 BASEND 0118 BBUFV 514A CHKCA 5152 CLINK 0115 E.ERR 
011C ENDMEM 3164 ERROR 316F ERRTAB 0006 HIMEM 0112 OUTM 
3124 PATCH 515B ST16 011A SUBPTR 0106 USR 5124 USR16 
0109 USRVF 010C USRVT 


No errors 


Note that the values defined here for symbolic constants such as USR and E.ERR, are 
merely typical. Check the Release Note for the exact values for the current version of 
BASIC. 


The following program tests this routine: 


10 CLEAR ,,100 РР 
20 FOR I=0 TO 9. 

SD CALL. "$Т16",1,1 

40 NEXT I 

50 FOR 1=0 TO 9 

60 PRINT USR(ID 

70 NEXT I 
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This Appendix summarizes the commands, functions, operators and special control 
characters available in Extended BASIC Version 5 and 6. 


COMMAND 


ABS 
AND 
ASC 
ATN 
ATTRIB 
AUTO 
BYE 
CALL 
CHR$ 
CLEAR 
CLOSE 
CLOSE й 
CLOSE INPUT 
CLOSE INPUT # 
CONT 
COPY 
COS 
CREATE 
DATA 
DEF 
DLETE 
DIM 
DIR 
EDIT 
ELSE 
END 
EOF 
EOF # 
ERASE 
ERL 
ERR 
ERROR 
EXCHANGE 
EXP 
FIX$ 
FLEN 
FN 

FOR 


PAGE 


PURPOSE 


Absolute value 

Logical AND operator 

Convert character to number 
Arctangent 

Return attributes set 

Automatic line numbering 
Return to monitor 

Call machine-language subroutine 
Convert number to character 
Delete variables, set string, files and cache space 
Close output file(s) 


V.6 only 


Close output file V.6 only 
Close input file(s) 

Close input file V.6 only 
Continue execution after CTRL/Z, STOP or END 

Copy a group of program lines V.6 only 
Cosine 

Open file for output 


Define constants 

User-defined function or procedure 

Delete program lines 

Dimension array 

Get disc directory 

Invoke the line editor 

Statement executed if condition is not true 
End of program 

Generate end-of-file condition 
Generate end-of-file condition 
Erase file 

Line number of last error 

Error number of last error 

Cause error 

Exchange values of two variables 
Natural antilogarithm 

Return fixed length string 

Return size of a random access file 
User-defined function 

Set up loop 


V.6 only 


V.6 only 


V.6 only 
V.6 only 
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COMMAND PAGE 
FPOS 13.10 
FRE 6.1 
FSAVE 4.5 
GET 12.5 
GETS 12.5 
GRAPH 11.1 
GOSUB 8.1 
GOTO 8.1 
НЕХ$ 9.9 
IF 8.2 
IMAGE 14.1 
INP 18.4 
INPUT 7.1 
INPUT # 12.4 
INPUT LINE 7.2 
INPUT LINE # 12.4 
INSTR 9.9 
INT 9.2 
KILL 10.3 
LEFTS$ 9.8 
LEN 9.8 
LET 6.3 
LINE 11.4 
LIST 4.5 
LLIST 4.5 
LLVAR 10.2 
LNULL 7.5 
LOAD 4.5 
LOAD? 4.6 
LOADGO 4.6 
LOCAL 9.15 
LOCAL PRINTER 4.8 
LOG 9.2 
LOOKUP 12.3 
LPOS 7.5 
LPRINT 7.4 
LTRACE 10.3 
LVAR 10.2 
LWIDTH 7.5 
MAX 9.4 
MERGE 4.7 
MERGEGO 4.7 
MID$ 9.8 
MIN 9.4 
MOD 9.4 
NETWORK PRINTER 4.8 
NEW 4.8 
NEXT 8.4 
NOT 3.6 
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PURPOSE 


Return current RA record number 
Return free memory or string space 
Save program in internal format 
Single character input 

Single character input 

Set graph or text mode 

Call a subroutine 

Transfer control to another line 
Convert to hexadecimal 
Conditional test 

Format specification for output 
Input from an I/O port 

Input data from the keyboard 
Input data from a file 

Input entire line from keyboard 
Input entire line from file 

Search for a substring 

Truncate to integer 

Delete an array 

Extract left portion of a string 
Get length of a string 

Assign to variable 

Draw a line 

List program on console 

List program on printer 

List variables on printer 

Set nulls for printer 

Load program from a disc file 
Check internal format file 

Load and execute program 

Define local variables in FN/PROC 
Set up printer option 

Natural logarithm 

Test whether file exists 

Return current position of printer head 
Output to printer 

Set line number trace on printer 
Print variables on console 

Set width of printer 

Return the maximum of two values 
Merge programs 

Merge and execute programs 
Return middle of a string 

Return the minimum of two values 
Return a modulus value 

Set up printer option 


V.6 only 


V.6 only 


V.6 only 
V.6 only 


V.6 only 


V.6 only 


V.6 only 
V.6 only 


Clear all program statements and variables 


. Return to beginning of a loop 


Logical NOT operator 


"IP 


COMMAND 


ON BREAK 
ON EOF 
ON EOF # 
ON ERROR 
OPEN 

OR 

OUT 

PEEK 
PLOT 
POINT 
POINTS 
POKE 

POS 
PRINT 
PRINT # 
PRINTER 
PROC 

PUT 
QUOTE 
RANDOM 
RANDOMIZE 
READ 
READ # 
REM 
RENAME 
RENUMBER 


RESET 
RESTORE 
RESUME 
RETURN 
Нант 
RLEN 
RND 
RPOS 
RUN 
SAVE 
SGN 

SIN 
ЗРАСЕ$ 
SPC 

SQR 
STEP 
STOP 
STR$ 
STRING$ 
TAB 
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PURPOSE 


Set nulls for console 

Indexed transfer of control 

Trap console interrupt 

Trap end-of-file 

Trap end-of-file 

Trap error condition 

Open file for reading 

Logical OR operator 

Output to an I/O port 

Return data from a memory location 
Plot string, character, or dot 

Test screen location 

Test screen locations 

Change a memory location 

Return current console cursor position 
Output to console 

Output to a file 

Set up printer option 

User-defined procedure 

Single character output 

Set string quotes on output 

Create, or open, a random access file V.6 only 
Change seed used by random number generator 
Move data from a DATA statement to a variable 
Read from a random access file V.6 only 
Remark or comment 

Rename file 

Renumber program and change 

line number references 

Initialize discs 

Reset data pointer 

Resume execution after error 

Return control from a subroutine 
Return right portion of a string 

Return record length of RA file 
Random number 

Space remaining in a record 

Start execution of program 

Write a copy of the program to a disc file 
Get sign of expression 

Sine 

Returns a string of spaces 

Print spaces 

Square root 

Set FOR increment 

Terminate program execution 

Convert value to string 

Returns a repeated string 

Tabulate to column 


V.6 only 


V.6 only 


V.6 only 
V.6 only 


V.6 only 


V.6 only 
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COMMAND 


WRITE # 
XOR 
? 


, 


command. 


HRG CALLS 


CALL 


CLEAR 
COLOUR 


DISPLAY 
FILL 
GREAD 
GWRITE 
LINE 
OFFSET 


PLOT 
RESOLUTION 


SETCOL 
UPDATE 
VIEW 
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PAGE 


9.1 
11.2 
8.2 
8.4 


PAGE 


16.2 
16.3 


16.5 
16.6 
16.7 
16.8 
16.9 


16.10 


16.11 
16.12 


16.13 
16.14 


16.15 


PURPOSE 


Tangent 

Set text mode 

Statement executed if condition is true 
Set upper limit in FOR statement 
Set line number trace 

Return data type from RA file 
Format specification for output 
User provided machine-code routine 
Convert string to number 

Get variable address 

Wait for input status bit 

Set width of console 

Write to a random access file 
Exclusive OR of two values 
Equivalent to PRINT 

“©” form of comment 

“©,” form of line number 


PURPOSE 


Clear current page and view 


V.6 only 
V.6 only 


V.6 only 
V.6 only 


V.6 only 
V.6 only 


Set the actual intensity or colour displayed that 
corresponds to the specified logical intensity 
Specify the page and view to be displayed 


Fill the given rectangle 
Load graphics memory from disc file 
Save graphics memory in disc file 


Draw a line from the current position to 


given point 


Change coordinates of bottom left corner 


of screen 
Plot a point on the screen 


Select high, medium or extra high resolution and 


set number of bits/pixel 


Modify values held in memory-copy of colour 
look-up table without affecting the table itself 
To make a particular page and view accessible for 


modification by PLOT, LINE or FILL 


Transfer colour changes specified by SETCOL to 


colour look-up table 


mI 
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HRG CALLS (Level 2 only) 

CALL PAGE PURPOSE 

CHARSIZE 17.3 Define magnification of plotted characters 

COPY 17.4 Make a copy of a rectangle 

DEFCHAR 17.5 Define characters for use by STPLOT 

DUMP 17.7 Copy a rectangle from the screen to the printer 
PATSIZE 17.9 Define size of point printed from the screen 
PRINTER 17.13 Define printer type and print density 

RDOUT 17.14 Read the logical intensity of a point 

SHADING 17.15 Define shading pattern 

STPLOT 17.16 Plot a character string 

PREDEFINED VARIABLES 

NAME PAGE VALUE 

EE 9.6 2.71828 V.6 only 
PI 9.6 3.14159 V.6 only 
OPERATORS 


These operators are arranged in decreasing order of precedence. Operators of equal 
precedence are evaluated from left to right. 


ж / 

MOD 

d 

MIN 

MAX 

<> = <> >= <= 
МОТ 

AND 

OR 

XOR 


String concatenation 

Exponentiation 

Negation 

Multiplication, division 

Modulus Arithmetic V.6 only 
Addition, subtraction 

Minimum V.6 only 
Maximum V.6 only 
Relational operators 

Logical negation 

Logical AND 

Logical OR 

Logical Exclusive OR V.6 only 
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CONTROL CHARACTERS 


The control characters marked * act as toggles on the feature they control. Pressing 


once activates the feature, which persists until they are typed again: 


СТВІ / а * 


CTRL/A * 
СТВІ /С 
CTRL/E * 
CTRL/F 
CTRL/L 
СТВІ | 
CTRL/M 
CTRL/P * 
CTRL/Q 
CTRL/S 
CTRL/U 
CTRL/Z 
DELT 
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Toggle smooth scrolling 

(380Z, COS 4.0, 80-char. only) 
Toggle autopaging 

Return to CP/M (after check) 
Echo console output to printer 
Enter Front Panel (after check) 
Clear screen, cursor bottom left 
Clear screen, cursor top left 
Terminate Line 

Echo console output to printer 
Resume execution after CTRL/S 
Suspend program execution 
Delete current line 

Interrupt execution of program, erase line 
Delete previous character 
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APPENDIX B 
ERROR MESSAGES 


This Appendix gives a list of error messages and their causes. When an error occurs in 
a program, the error message will be followed by “аё line n", where п is the number of 
the statement BASIC was executing when the error was detected. For example: 


10 PTINT "HELLO" 
RUN 


Syntax error at line 10 
Ready: 


The numbers given with each error are the error numbers used in conjunction with the 
ERROR command and the ERR function. 

] External error 

This error can be generated by machine-code routines, but should not occur otherwise 
in the absence of ERROR commands. 

2 NEXT without FOR 

A NEXT statement has been encountered without a corresponding FOR statement. 
This error can also occur if GOSUBs and FOR loops are badly nested. 

3 Syntax error 


This usually means that an unexpected character has been found, suggesting an 
invalid statement. This is the most common error message. 


4 RETURN without GOSUB 


A RETURN statement has been encountered without a corresponding GOSUB. 


5 Out of data 


There are insufficient data items in the program to satisfy all of the READ commands. 
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6 Illegal function 


This is generated when a command is presented with illegal arguments. This usually 
means that the arguments are not in the expected range. 


7 Arithmetic overflow 

The result of a calculation lies outside the permitted range, i.e. the magnitude of the 
number is greater than about 1E38. This error can also occur if ridiculous numeric 
constants are provided, for example in DIM statements. 

8 Out of memory 

There is insufficient memory available to store the program and variables. The most 
common cause is that arrays are DIMensioned too large for the available memory. 
9 Undefined statement 

A statement number, after GOTO, GOSUB, RESTORE, etc., references a line which 
does not exist. 

10 Subscript out of range 

A subscript of an array is negative or greater than the upper bound of the 
corresponding dimension as declared in the DIM statement. This can also occur in a 
. DIM statement if the memory size is greatly exceeded. 

11 Redimensioned array 


An array in a DIM statement has already been DIMensioned. 


12 Can't divide by zero 


This error is caused by an attempt to divide by zero. 


13 Illegal direct 


Some commands, such as INPUT and DEF, are illegal in direct mode, i.e. without a 
line number. Attempting such a command results in this message. 


14 Type mismatch 


A numeric expression was found where a string expression was expected, or vice versa. 
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15 Nostring space 


BASIC needs more space in which to store strings than is available in string space. 
String space should be increased with CLEAR. 


16 String too long 


An attempt has been made to create a string longer than 255 characters. 


17 String too complex 
A string expression is too complicated for BASIC to handle. This usually means that 


string functions are too deeply nested. The expression should be split into two or more 
parts using intermediate variables. 


18 Can’t continue 

The CONT command has been used in an illegal context. It can only be used after 
interrupting arunning program with <CTRL/Z>, STOP or END and before modifying 
the program. | 

19 Undefined user call 

A user-defined function (after FN) has been referenced without having first been 
defined. This error is unlikely to occur in Extended BASIC Version 6, as the function 
does not have to be defined before it is referenced. 


20 Illegal EOF 


The end of the input file has been reached, and there is no ON EOF currently active. 


21 Files different 


The file inspected with LOAD? is not the same as the program held in memory. 


22 Recovered 


This message is generated after BASIC is entered via the restart address (given in the 
Release Note). It should not occur in normal operation. 


23 Name not found 
The subroutine name in a CALL command cannot be found in the subroutine name 


list. 
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24 Can’t verify ASCII files 


A LOAD? command has been presented with an ASCII file — i.e. the file had been 
SAVEd, not FSAVEd. BASIC cannot do this. 


25 Can’t MERGE internal files 


A MERGE command has been presented with an internal format file. 


26 Unknown error 


This error is no longer defined. 


27 Read error 

An error has occurred during a read operation from file. If this occurs there is probably 
a hardware fault. This can also occur on a network system if an attempt is made to read 
from a disc that has been removed. 


28 RESUME without error 


A RESUME command has been encountered but no error has occurred. 


29 Record too long 


A line in an input data file is longer than the input buffer, which is 130 characters in 
Extended BASIC Version 5, and 253 characters in Extended BASIC Version 6. 


30 Invalid unit number 

Aninvalid channel specification has been given. The only channels allowed are 0, 2 and 
10 (and 20-127 in BASIC 6 only), and some operations, such as OPEN and CREATE, 
are not allowed on channels 0 or 2. This error is also the result of trying to INPUT from 
the printer, or, in BASIC 6, trying to read from a file open for writing or vice versa. 
31 Missing file name 


The file specification after LOAD, SAVE, or MERGE is missing. 


32 No input file 


An attempt has been made to read from an input file (with INPUT or INPUT LINE) 
without first having OPENed it. 
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33 No output file 


An attempt has been made to write to an output file (with PRINT, DIR, etc.) without 
first having CREATEd it. 


34 Invalid device 

The device name part of a file specification is illegal, i.e. it is not one of CON:, RDR:, 
PUN:, LST:, or A: to P:. 

35 Invalid file name 


The file name part of a file specification is illegal. 


36 Write error 

Anerror has occurred during a write operation to file. This could occur on disc systems 
if the disc becomes full, but usually implies a hardware malfunction. It should be very 
rare. On a network system this can occur if a permanent disc error (such as the disc not 
being present) is detected during a write operation. 

37 Wrong internal format 

A file presented to LOAD or LOADGO is in an internal format incompatible with this 
BASIC. Either the file is corrupt or it was prepared from another version of BASIC. 
38 File not found 

The file specified after LOAD, MERGE, OPEN, or RENAME could not be found. On 
cassette systems this will be generated only on the ROM Pack channel. 

39 Directory full 

The disc directory already holds the maximum number of files allowed and an attempt 
has been made to add another. An extent to a file is treated as a separate file, so this 
error could occur after any disc write operation. This error will not occur on cassette 
sytems. 

40 No disc space 

The disc is almost full. There will just be sufficient room to CLOSE the output file, but 


to proceed you must either erase something or change the disc and issue a RESET 
command. This error will not occur on cassette systems. 
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41 Close error - 


An error has occurred during a CLOSE command, and BASIC was unable to CLOSE 
the file. This error is usually caused by attempting to CLOSE a file which has been 
ERASEd or КЕМАМЕЧ. This error will not occur on cassette systems. — 


42 ROM Pack read error 
An error has occurred during a ROM Pack operation. Usual causes are the ROM Pack ши 
being removed while being read, ап integrated circuit in the ROM Pack not inserted 
correctly or a faulty ROM Pack. This error can be generated only on a 480Z cassette 
system. 


43 Read only file/disc | 
An attempt has been made оп a network system to write to a read-only file or disc. If 
the disc is not physically write-protected, and no other user has any files open on that 
drive, then RESET will set the disc to read/write status. 


N 


44 File in use 


An attempt has been made on a network system to open a file that another user has ~ 
open for writing. 

45 Too many files on Network mE 
Either you have attempted to open more than 8 files, or the file limit on the network 

server has been reached. m. 
46 Not logged in " 


This indicates that the network server has been restarted without CP/NOS being 
reloaded into the station. 


og 


47 Unknown I/O error 


NU" 


This means BASIC has received an unexpected error from a network. This should not 
normally occur and must be reported to the network manager if it does. 


gott 
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Unknown error 


This error is generated if BASIC attempts to produce an error message not in its list. It 
implies either corruption of the interpreter or an ERROR command has been executed 


with an argument outside the permitted range. 


Interrupted 


This message, while not strictly an error message, is included here for convenience. It 
is generated when BASIC executes a STOP command or when program execution is 
interrupted by pressing <CTRL/Z>. In either case program execution can be resumed 
by the CONT command. 


*Invalid input 


This message is produced when a response to an INPUT statement requiring a 
number starts with a string. The entire line must be repeated. This error does not 


terminate the program. 


*Extra lost 


The response to an INPUT statement contained more data items than were required 
to satisfy it. The excess items are lost. This error does not terminate the program. 
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APPENDIX C 
CHANGES FROM PREVIOUS VERSIONS 


This Appendix describes first most of the differences between Extended BASIC 
version 5 and ОВА 59 version 3.0. Changes from version 4 are described next, followed 
by changes made to version 5 since version 5.0 A, and finally a summary is given of the 
differences between the current versions 5 and 6. 


CHANGES FROM DBAS9 


Because a number of keywords have been added, the choice of variable names is rather 
more restricted in Extended BASIC version 5 than in DBAS9 or version 4, as 
variables must not contain embedded keywords. 


The WIDTH command has been changed to allow an infinite line length, which is now 
the default. It now accepts a channel number after #, and the WIDTHs for the console, 
printer, and file channels are all independent. 


The NULL command can now accept a channel number after #, and all three output 
channels have independent NULL settings. 


The QUOTE command has been introduced to simplify file handling. The default 
situation is unchanged. 


The random number generator is initialized by typing RUN. This means that each 
RUN of a program will get the same sequence of randoms unless the RANDOMIZE 
command is issued. 


ON EOF now works in a slightly different manner. It traps the end of file situation 
directly, instead of checking just at the ON EOF statement itself. This means that the 
ON EOF command need not be placed within the INPUT loop, and it works with 
multiple data items per line. The form ON EOF disables end-of-file checking. 


The EOF command causes BASIC to react as if the end-of-file had been reached. 


All of the commands which produce output can now be followed by a channel 
specification to redirect the output. 


A string entered at the keyboard in response to an IN PUT command need no longer be 


enclosed in quotes if it contains a colon. If an INPUT statement includes a prompt 
terminated with a comma, the normal question mark prompt is suppressed. 
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CHANGES FROM PREVIOUS VERSIONS 


The INPUT LINE command has been added as an enhancement of INPUT, allowing 
all of the input to be transferred to the variable including spaces and commas without 
the need to enclose the date in quotation marks. LINE INPUT is equivalent to INPUT 
LINE. 


Numeric constants may now be supplied in hexadecimal, preceded by an ampersand 
(&). The CLEAR command can now take a second argument, which specifies cache 
memory. The default string space size is now 100 bytes. 


RESTORE can now take an optional line number, which allows the data pointer to be 
set to the specified line. 


The BYE command has been added, chiefly to allow a program to leave BASIC. It first 
CLOSEs any files. 


The PLOT command has been extended. It no longer reports an error if the point is off 
the screen. If the third argument is a string, it is PLOTted directly, and if it is missing, 
BASIC uses the last number given. With the 380Z a fourth argument to PLOT sets 
attributes on an 80-character board. 


The LINE command has been added to increase the speed of line drawing. 


The functions POINT and POINTS have been added, which return the contents of the 
screen. With the 380Z 80-character board the ATTRIB function returns any set 
attributes. 


The CALL command has been added, which provides far greater flexibility in calling 
machine-language subroutines than is possible with USR. 


The function VARADR has been added, which returns the address of a variable. This 
is of use chiefly with machine-language subroutines. 


The LOADM command becomes MERGE. The effect is unchanged. The FSAVE 
command allows saving of internal format program files, which can be loaded 
extremely rapidly. LOAD deals with this type of file as well. The commands 
LOADGO, MERGEGO, and LOAD? have been added. 


All of the routines accessible by the FILES command can now be called by more 
mnemonic names, viz. 


FILES 0 RESET 
FILES 1 OPEN 
FILES 2 CREATE 
FILES 3 CLOSE 
FILES 5 ERASE 
FILES 6 RENAME 


In addition, the DIR command has been added, and can if desired be accessed by 
FILES 7. 


The LOOKUP function has been added to allow a program to determine whether or not 
a file exists. і 
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CHANGES FROM PREVIOUS VERSIONS 


The OPEN, CREATE, and CLOSE commands should be followed by a channel 
number, although in this version no error is caused if it is omitted. 


An attempt to CREATE a file which already exists no longer causes an error. Instead, 
the message: 


File exists--replace(Y/N): 


is output and action taken according to the response. The ERASE command no longer 
reports an error if the file did not exist. 


The forms PRINT #; and INPUT #; have now been replaced by PRINT #10 and 
INPUT #10, although the semicolon form still works. 


The commands GET and СЕТ$, for single character timed input, and PUT for single 
character output, have been added. 


Within 380Z EDIT, the R (replace) command can be aborted by the ESC or RETURN 
keys in the same manner as Insert mode. The К command no longer echoes че deleted 
characters between backslashes. 


The DELETE command no longer fails if the final line does not exist; it will now 
DELETE the same lines that LIST would list. 


The ON ERROR command has been added, which with the RESUME command and 
the functions ERR and ERL allows program control of execution errors. The ERROR 
command causes an error. 


The ON BREAK command traps console interrupts with <CTRL/Z>. 


BASIC stores the last key struck while a program is running. This effectively allows 
one key type ahead. It also allows <CTRL/Z> to interrupt a program while the screen 
is paging. 


It is now possible to CONTinue after an INPUT statement has been interrupted with 
<CTRL/Z>. 


<CTRL/E> and <CTRL/P> now both cause console output to be echoed to the printer. 
<CTRL/S> stops the program running. <CTRL/Q> resumes execution and 
<CTRL/Z> interrupts the program. 


The PRINTER command has been included to allow selection of a printer directly 
from BASIC, without entering the Front Panel. 


The НЕХ$ function has been added. 
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CHANGES FROM VERSION 4 


This section describes the differences between version 5 and version 4 of Extended 
BASIC. 


The GET and СЕТ functions and the PUT command have been added. 

The FSAVE command has been added, and the LOAD command modified to cope 
with the internal format files it produces. The LOAD?, LOADGO, and MERGEGO 
commands have been added. 

ON ERROR, RESUME, ERROR, ERR, and ERL have been added. 

The ON BREAK command has been added. 


The PLOT command has been greatly extended. The LINE command and the POINT, 
POINTS, and ATTRIB functions have been added. 


The PRINTER command has been added. 


The default quote character for the file device has been changed back to zero, 
maintaining compatibility between DBAS9 and version 5. 


The question mark prompt on an INPUT or INPUT LINE statement is suppressed if 
a supplied prompt is terminated by a comma. 


<CTRL/O> no longer suspends program output. 


CHANGES FROM VERSION 5.0 A 


Lower case letters are now recognized as forming part of numbers where appropriate, 


66 „2? 


і.е. “е” in exponents and "а" to “f” in hexadecimal numbers. 


A check is made that a line number after GOTO, GOSUB, THEN etc. terminates the 
statement. Previously, no check was made. 


Any ON ERROR flag is cleared when BASIC is reentered via its restart address 
(normally 103 hex). This means that the program does not automatically resume 
execution. 


Line 0 (zero) now never permitted. 
The warning messages ““Ехіта lost" and “*Invalid input" do not appear after 
INPUT from a file. Instead, these error conditions are ignored, with a new line being 


read after “*Invalid input”. 


The LINE INPUT statement has been added and is identical to INPUT LINE. 
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CHANGES FROM PREVIOUS VERSIONS 


Error 20, "Illegal EOF”, becomes ‘‘Illegal end-of-file". 


Lines not starting with a digit are ignored on LOAD, LOADGO, MERGE, and 
МЕВСЕСО. This allows correct parts of corrupt files to be loaded successfully. As a 
result, the error message “Missing statement number” disappears. The statement 
ERROR 26, which would have generated this error, now results in "Unknown error". 


Typing <CTRL/O> now has no effect, instead of suppressing program output. 
When <CTRL/F> is pressed, the message: 

TF--are you sure (Y/N): 
appears and BASIC waits for a key to be typed. If the response is Y or y the Front 


Panel is entered. Otherwise BASIC continues execution. If <CTRL/F> is typed while 
GET or СЕТ$ is waiting for a character, the value 6 is returned and the Front Panel is 


NOT entered. 
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SELECTING A PRINTER 


SETTING UP A PRINTER 


Connecting a printer to the computer requires that the printer be plugged into an 
appropriate connector on the computer rear panel, and informing the computer that 
you have done this. Both of these operations, while being simple in principle, are very 
easy to get wrong, so if it doesn’t work, try again after rereading the instructions. 


If your printer has a parallel interface, it should be plugged into the User ГО socket on 
the back panel. This is a 25-way D submin female socket connected to the boards of the 
computer by a flat 20-way cable. It may be marked РІ. 


There are three types of interface supplied with the 480Z, one parallel and two serial. 
The serial interfaces are 8-way DIN sockets. 


There are several types of serial interface supplied with the 380Z. Most of them appear 
on the back panel as 25-way D submin sockets, connected to the boards by relatively 
few wires — 10 at most and probably less. It may be marked S1. 20 mA current loop 
interfaces use a 6-pin DIN connector. 


If you are unsure of the type of interface on your printer, check the socket on the 
printer. АП parallel type printers sold by Research Machines accept a plug which hasa 
single oblong plastic tongue surrounded by 36 contacts. No serial printers use this sort 
of connector. 


After connecting your printer to the computer you must set up a printer option. In 
BASIC, this is normally done by the PRINTER command. The first number supplied 
indicates the type of the printer. Parallel interfaces (e.g. Anadex, Centronics) are 
always type 3. Printer type 0 is the screen, which means that all output sent to the 
printer (e.g. with LPRINT) appears on the screen. The computer normally comes on in 
this state. 


On a 480Z, SIO-2 serial interfaces are printer type 2. Type 4 is used for SIO-4 
interfaces. 


On a 3807, SIO-2 and SIO-2B serial interfaces are printer type 2. Type 4 is used for 
SIO-4 interfaces. Type 1 is for SIO-1B and SIO-1A interfaces. Printer types 5 and 6 are 
used for an SIO-5 or SIO-6 respectively. 


If you are unsure of the particular type of your 3807 serial interface, check the board 
inside the computer which connects directly to the socket on the back panel. If the 
board is a small one, about three inches by two, it is either an 510-2 or SIO-2B, and 
therefore type 2. If it is a standard sized card (about 10” X 5") with about a third of the 
board completely blank, it is a type 1 interface. Otherwise it is type 4, 5 or 6. 
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Printer types 2, 4, 5, and 6 for the 380Z and printer types 2 and 4 for the 480Z requirea 
"Baud code", a number which indicates the Baud rate of your printer. This is a 
measure of how fast the printer is, and the rate at which the computer sends 
information to be printed obviously must match the rate at which the printer expects 
to receive. Check the printer to find out the expected Baud rate. Then select the 
appropriate code from the table below, and pass this as the second argument to 
PRINTER. 


Code Baud rate 
0 110 
1 300 
2 600 
3 1200 
4 2400 
5 4800 
6 9600 


Printer type 2 will not go faster than 2400 Baud. With a 380Z printer, type 1 baud rates 
are set by a small switch on the rear panel. 


After a printer has been selected, test the printer by trying 

LPRINT "HELLO, WORLD" 
If this prints nothing, then check the printer type and that you have connected the 
printer correctly. If it prints garbage, then the Baud rate is probably set incorrectly; 


try another. If the message appears on the screen, then printer type 0 has been 
selected. This often means that the type number was too large. 


EXAMPLES 

For an Anadex DP-9501 printer with a parallel interface, use: PRINTER 3 
For а Teletype with an SIO-2 serial interface, use: PRINTER 2,0 
For a Qume daisy wheel with an SIO-4 serial interface, use: PRINTER 4,3 
For an EPSON printer with a parallel interface, use: PRINTER 3 
For an EPSON printer with a serial interface, use: PRINTER 4,6 
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APPENDIX E 
COLOUR LOOKUP TABLE 


The elements of the colour lookup table that apply in the various modes are tabulated 
in this Appendix. These tables should be referred to when using SETCOL. In the three 
medium resolution modes, all 16 values must be set up by SETCOL before calling 
VIEW. In the two high resolution modes only the first four values need be defined. 


HIGH RESOLUTION, 2 BITS/PIXEL (HR2) 
The first 4 elements of the colour lookup table correspond directly to intensities 0 to 3. 


Table View 0 
Address Intensity 


0 0 
1 1 
e 2 
5 5 


Values assigned to table addresses 4 to 15 will be ignored. 


HIGH RESOLUTION, 1 BIT/PIXEL (HR1) 


The first 4 elements of the colour lookup table govern 2 views as follows: 


Table View 1 View 0 
Address Intensity Intensity 


0 0 0 
1 0 1 
2 1 0 
5 1 1 


Values assigned to table addresses 4 to 15 will be ignored. 


MEDIUM RESOLUTION, 4 BITS/PIXEL (MR4) 


The 16 elements of the colour lookup table correspond directly to intensities 0 to 15 
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MEDIUM RESOLUTION, 2 BITS/PIXEL (MR2) 


The 16 elements of the colour lookup table govern 2 views as follows: 


Table View 1 View 0 
Address Intensity Intensity 


0 0 0 
1 0 1 
2 0 2 
3 0 3 
4 1 0 
5 1 1 
6 1 2 
7 1 5 
8 2 0 
9 2 1 
10 2 2 
11 2 5 
12 3 0 
13 3 1 
14 3 2 
15 3 5 


Thus, to see those pixels that are of intensity 3 and are common to views 0 and 1, set 
element 15 to be visible, and the rest to background. 


MEDIUM RESOLUTION, 1 BIT/PIXEL (МЕ 1) 


The 16 elements of the colour lookup table govern 4 views as follows: 


Table View 3 View 2 View 1 View 0 
Address Intensity Intensity Intensity Intensity 


0 0 0 0 0 
1 0 0 0 1 
2 0 0 1 0 
5 0 0 1 1 
4 0 1 0 0 
5 0 1 0 1 
6 0 1 1 0 
7 0 1 1 1 
8 1 0 0 0 
9 1 0 0 1 
10 1 0 1 0 
11 1 0 1 1 
12 1 1 0 0 
13 1 1 0 1 
14 1 1 1 0 
15 1 1 1 1 


Thus, to see those pixels that are common to views 2 and 3, set elements 12 to 15 to be 
visible, and the rest to background. 
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APPENDIX F 
ESCAPE SEQUENCES 


An escape sequence is a character string sent to the screen and recognized as special 
because of certain characteristic features. Instead of the characters appearing on the 
screen, other actions take place. 


Escape sequences may be generated within a BASIC program by using PUT state- 
ments, and an example of their use would be to switch a screen capable of operating in 
either 40- or 80-character mode into the mode required for the current program. 

Escape sequences can only be used on 480Z and 80-character 380Z systems. Ona 


40-character 380Z the characters are output literally, and, because some of the values 
will have undesireable effects, they are probably best avoided. 


CHARACTERISTIC FEATURES 


An escape sequence is distinguishable from any other string of characters by the 
following characteristics: 


e Its first character is the ESCAPE character (ASCII 27) 

e The second character of an escape sequence is known as the Sequence 
Introducer (SI), which must be one of the characters from the list below, and its 
value determines the number of subsequent characters which are assumed to be 
part of the escape sequence 


е The subsequent characters needed for each SI are also shown below, and may 
include a Switch (SW) and/or a Control Parameter (CP) 


е A Switch may take the value “0” (to switch a feature off) ог “1” (to switch it on) 


e A Control Parameter may take any value given in the lists below. 


ERRORS IN ESCAPE SEQUENCES 


Once an ESCAPE character has been sent to the screen to denote the beginning of an 
escape sequence and if the SI is not recognized then the escape sequence is 
immediately terminated and any further characters in the sequence are displayed on 
the screen in the usual way. 


Illegal characters after a legal SI will invalidate the sequence but will not affect the 
number of characters diverted from the screen. 


Any escape sequence in which an error is detected is not executed. 
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ESCAPE SEQUENCES 


1. Send a special character to the screen: 


SI = “1” (ASCII 33) 


The sequence after the SI is a single byte to be output directly to the screen, 
with the characters in the range ASCII 0-31 or ASCII 127 not being 
interpreted as special characters. 


Example: PUT et ТО 
or, if preferred, PUT 27,33,10 


sends a character with the ASCII value 10 directly to the screen. 


2. Set switches on or off: 


SI = “=” (ASCII 61) 
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The sequence after the SI is a switch (SW) followed by a CP. 
СР = "B" Switch off or on the underline attribute 

CP — "C" Switch off or on the dim attribute 

СР = “D” Switch off or on the reverse video attribute 


СР = “Е” Switch off or on the <CTRL/F action in CP/M and COS/ROS 
(not the <CTRL/F> action in BASIC) 


CP = “а” Switch off or on Ше <CTRL/A> action 
(See "Controlling Screen Output” in Chapter 2) 


СР = “Г” Switch off or on the text іп HRG output 


СР = “J” Switch off or on the 80-character mode 
(only available on an 80-character system) 


СР = “L” Switch off or on the alternate character set 
Example: PUT ОЕТ 


will ensure that the 380Z/480Z is operating in 80-character mode (if it is 
capable of doing so). 


Note: If the screen is in “graphics” mode when you set the J switch, the 
screen will return to “text” mode. 
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3. Restore the function keypad keys (4807, only) to their original uses: 
SI = “>” (ASCII 62) 
The sequence after the SI is a CP only. 
СР = “D” Restore all of the function and arrow keys to their original 
values (i.e. undo the effects of SI = "95" described in 6, below). 
Note that this does not redefine them to the values set by 
BASIC for its editor. 


Example: PUT. 27,">D" 


4. Define or redefine the display scrolling window: 
SI — ''?" (ASCII 63) 
The sequence after the SI is 4 bytes followed by a CP. 
СР = “А” The 4 bytes define a scrolling window, in the order X(lower), 
X(upper), Y(lower), Y(upper), and the values must be such that: 
0 <= XL <= XU <= 39 (40-character width screen), or 
0 <= XL <= XU <= 79 (80-character width screen), 
and: 
0 <= YL <= YU <= 23. 


СР = “В” The 4 bytes define a rectangular area to be cleared, with order 
and value limits as above. 


Example: PUT 27,"?",0,39,20,235,"A" 


will define a scrolling window to be the full width of a 40- character screen, 
using only the bottom 4 lines of the screen. 


5. Beeper sound: 
SI = “а” (ASCII 64) 
The sequence after the SI is 2 bytes followed by a CP. 


СР = “А” The 2 bytes define the frequency and duration respectively of 
the beeper (which is sounded by <CTRL/G>). 


Example: PUT 27,"8",150,75,"А" 


Note that only 4802, systems have beepers fitted as standard. 
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6. Define new uses of the function keypad keys (4807; only): | 


SI = “%” (ASCII 37) 


The sequence after the SI is a CP, followed by a byte (of value n), then n 
further bytes. The sequence is used to redefine the character string that is 
generated when a function or arrow key is pressed. The new character string 
will be the last n bytes of the escape sequence. 


The character string can be of any length from 0 to 127 bytes, but the total 
number of characters for all keys is also limited to 127. If the string is too long 


the escape sequence will have no effect. 


СР =“А” Redefine <up-arrow> 

СР = “В” Redefine <right-arrow> 

СР = "С" Redefine <down-arrow> 

CP = “D” Redefine <left-arrow> 

CP = “E” Redefine <F1> 

CP = “Е” Redefine <F2> 

СР = “G” Redefine <F3> 

CP = “H” Redefine <F4> 

СР = “Г” Redefine <SHIFT/up-arrow> 
СР = “J” Redefine <SHIFT/right-arrow> 
СР = “K” Redefine <SHIFT/down-arrow> 
СР = “L” Redefine <SHIFT/left-arrow> 
СР = “М” Redefine <SHIFT/F1> 

СР = “N” Redefine <SHIFT/F2> 

СР = “O” Redefine <SHIFT/F3> 

СР = "Р" Redefine <SHIFT/F4> 
Example: PUT 27,"AG",4,"  RUN",13 


will redefine the F3 function key so that it generates the string: 


7. Define a dot pattern: 


SI = “<” (ASCII 60) 
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RUN<RETURN> 


The sequence after the SI consists of the 13 bytes: 
c, b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, b11, b12 
where c is the character (in the range ASCII 128 to 255) that is to have its dot 


pattern іп the Writable Character Store redefined, and 51, b2, ... 512 contain 
the new dot pattern. 


——————————————— А 


“7” form of comment 
“ .” form of line number 


А < prompt 

ABS 

Addition Game program 
Alphanumeric Character 
ALT MODE 

AND 

Animation 

Apostrophe form of comment 
Appending to files 
Arithmetic Operations 
Arithmetic Overflow 
Array 

— Clearing 

— Deletion 

— Determining Address 
— Dimensions 

— Elements 

— Numeric 

— Representation 

— String 

— Subscript 

— Subscript Evaluation 
ASC 

ASCII format 
Assembly Language 

— ZASM Assembler 
ATN 

ATTRIB 

AUTO 

Automatic Line Numbering 
Automatic Paging 


BASEPAGE Addresses 
— BRFCB 

— BWFCB 

— CH.INPUT 

— CH.OUTPUT 

— E.ERR 

— OUTM 

BASIC 

— address 

— BASICS 

— BASICSG 

— BASICSG2 

— Dialects 

— Displaying Characters 
— Getting Started 
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10.1 BASIC (-contd.) 
4.2 — Interpreter 2.1 
— Loading 18.9 
2.1 — Multiple Statements 3.8 
9.3 — ona Network Station 2.1 
12.14 — ona Stand-Alone System 2.1 
3.2 — Program Format 3.7 
1.3 — Restarting from recovery 2.11 
3.6 — Restrictions on use 18.1 
15.20 — Return to Operating System 2.10 
10.1 — Statement 2.2 
12.10 — Terminating а session 2.10 
2.3, 3.6 — Use as a calculator 2.3 
3.2 — Variables 2.7 
— Version 6 4.1 
6.1 — Versions 5 & 6 1.1, 3.5 
10.3 Baud Code 4.8 
- 18.6 Binary Exponent 3.8 
3.3 BREAK | 1.3 
3.3 BRFCB pointer 18.15 
3.3 Buffer space 13.1 
3.4 BWFCB pointer 18.15 
3.3 BYE 10.1, 13.2 
3.3 
3.10 
9.7 Cache 3.5 
4.6 Cache memory 18.4 
18.1 Calculator (see BASIC) 2.3 
18.3 CALL 18.8, 15.2, 18.1, 18.6 
9.2 CAPS LOCK 1.3 
11.5 Case construction 8.3 
4.1 CH.INPUT routine 18.15 
4.1 CH.OUTPUT routine 18.15 
2.7, 4.5 Changing Discs 4.10 
Channel Numbers 12.1, 13.1 
Character dimming 11.3 
18.15 Character Representation 17.5 
18.15 Character Strings © 3.2 
18.15 CHARSIZE 17.3 
18.15 CHR$ 9.7, 12.5 
18.14 CLEAR 6.1, 3.4, 13.1, 18.3 
18.14 CLEAR routine 16.2 
18.1 Clearing Graphics Area 2.5 
2.11 Clearing Memory 2.6, 4.8 
15.1 CLOSE 12.2, 13.2, 13.10 
15.1 CLOSE INPUT 12.2, 13.2, 13.11 
15.1 Closing Files 10.1 
3.9 COLOUR 16.3, 15.8 
2.2 Colour lookup tables 15.8 
2.1 Combining and Running Programs 4.7 
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Commands 18.6 Commands (-contd.) 
— Apostrophe form of comment 10.1 — NETWORK PRINTER 4.8 
— AUTO 4.1 — NEW 2.6, 4.8 
— ВУЕ 10.1, 2.11, 13.2 — NULL 7.5, 12.8 
— CALL 18.8, 15.2, 18.1, 18.6 — ОМВВЕАК 8.8 
— CLEAR 6.1, 3.4, 6.1, 13.1, 18.3 — ОМЕОЕ 12.4, 12.7, 13.2 
— CLOSE 12.2, 13.10, 4.4, 4.5, 13.2 — ОМЕВКОВ 8.6 
— CLOSE INPUT 12.2, 13.11, 4.4 — ON...GOSUB 8.4 
— CONT 4.3, 2.8 — ON...GOTO 8.3 
— COPY 4.3 — OPEN 12.3 
— CREATE 12.3, 12.6 — OUT 18.5 
— DATA 6.2 — Output Control 12.7 
— DELETE 4.3 — PEEK 11.1 
— DIM 6.2 — PLOT 11.2, 15.2 
— DIR 4.4, 2.10, 4.1, 12.7 — POKE 11.1, 18.3, 18.4 
— DSKRESET 12.3 — POS 12.6 
— EDIT 5.1, 5.6 — PRINT 7.3, 12.8, 15.2 
— EDIT. 4.2 — PRINT Я 12.6 
— ELSE 8.2 — PRINT USING 14.1 
— END 10.1 — PRINTER 4.8 
— EOF 12.7, 13.2 — PUT 12.6 
— ERASE 4.4, 4.1 — PUT 27,.... 10.3 
— ERL 8.8 — QUOTE 12.8 
— ERR 8.6 — RANDOM 13.4 
— ERROR 8.8 — RANDOMIZE 10.3, 9.3 
— EXCHANGE 6.3 — READ 6.4, 13.6 
— FOR..TO..NEXT 8.4 — RELEASE 4.10, 12.3 
— FSAVE 4.5, 4.7 — REM 10.1, 4.9 
— GOSUB....RETURN 8.1 — RENAME 4.1, 4.9 
— GOTO 8.1 — RENUMBER 2.9, 4.9 
— GRAPH 11.1, 15.2 — RESET 2.11, 4.10, 12.3 
— IF...THEN 8.2 — RESTORE 6.4 
— INPUT 7.1, 12.4 — RESUME 8.6 
— Input Control 12.7 — RET 18.9 
— INPUT LINE 12.4, 7.2 — RETURN 3.8 
— KILL 10.3 — RUN 2.7, 4.10, 9.19, 9.22 
— LET 6.3 — SAVE 2.10, 4.1, 4.11 
— LINE 11.4 — STOP 10.1 
— LIST 2.7, 4.5, 4.1, 4.2, — TAB 12.6 
121.152 — ТЕХТ 1L2 15.2 
— LIST. 4.2 — TRACE 10.2, 12.7 
— LLIST 4.5, 2.9 — TYP 13.12 
— LLVAR 10.2 — UNLOCK 13.11 
— LNULL 7.5 — USR 18.7, 18.1, 18.6 
— LOAD 2.10, 4.5, 4.1 — VARADR 18.6 
— LOAD? 4.6 — WAIT 18.5 
— LOADGO 4.6 — WIDTH 7.5, 12.9 
— LOCAL PRINTER 4.8 — WRITE 13.9 
— LPRINT 2.9, 7.4 Comments 
— LTRACE 10.3 — Introduced by ’ 10.1 
— LVAR 10.2, 12.7 — Introduced by REM 10.1 
— LWIDTH 7.5 Conditional Statements 3.6 
— MERGE 4.5, 4.7 Constants (numeric) 3.2, 3.8 
— MERGEGO 4.7, 4.9 CONT 4.3 
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Continuing program execution 2.8 
Control Characters 2.11 
— CTRL/A 2.7, 4.5 
— CTRL/C 2.11, 10.1, 12.5 
— CTRL/E 2.9 
— CTRL/F 12.5 
— CTRL/L 1.3 
— CTRL/O 1.3 
— CTRL/Q 2.8, 4.5 
— CTRL/S 2.8, 4.5 
— CTRL/Z 2.8, 4.2, 4.5, 12.5 
— FF 1.3 
— for 380Z Editing 5.4 
— for 480Z Editing 5.5 
Coordinates 2.6 
COPY 4.3 
COPY routine 17.4 
Copying files 12.10 
Copying Program Lines 4.3 
Correcting Key errors 2.4 
Corrupted files 4.5 
COS 9.1 
CP/M Versions 1.1 
CREATE 12.3, 12.6 
— Example program 12.9 
CREATE USING 7.6 
CTRL 1.3 
CTRL/Z 4.2 
Cursor 2.5, 4.5 
Curve Plotting 11.4 
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DATA 6.2 
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DEFCHAR 17.5 
DELETE 4.3 
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— Saving Programs 
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— Working 

Disc Directory 
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DISPLAY 
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DUMP 
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—X 5.4 
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END 10.1, 4.3 
End of file marker 13.8 
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— Creating a data file 12.9 
— Creation 12.3 
— Directory 2.10 
— End of file marker 13.8 
— End of record marker 13.8 
— Existence 12.3 
— File size 13.13 
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— Locking 13.11 
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GET$ 12.5 
Global Variables 9.14 
GOSUB 3.5 
GOSUB...RETURN 8.1 
GOTO 8.1 
GRAPH 2.5, 11.1, 15.2 
Graph Plotting 2.5 
Graphics 15.8 
— 380Z/480Z 11.1 
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— Changing Origin 16.10 
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— CLEAR 15.13 
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— COLOUR 15.1, 15.8, 15.14 
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15.8, 16.13 
— Colour Setting 16.3 
— DISPLAY 15.9, 15.14 
— Displaying characters 2.5 
— Displaying dots 2.5 
— Displaying text 1.3 
— EXCLUSIVE-OR plotting 15.7 
— FILL 15.6, 15.14 
— Graph plotting 2.5, 17.17 
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— Intensity 15.1, 15.6 
— Level 17.1 
— LINE 15.14 
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— Multiple Views 15.12 
— OFFSET 15.5 
— Page 15.1 
— Pixel 15.1, 15.3 
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HEX$ 9.9 
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— DISPLAY 16.5 
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— FILL 16.6 
— GREAD 16.7 
— GWRITE 16.8 
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— OFFSET 16.10 
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— PLOT 16.11 
— PRINTER 17.13 
— RDOUT 17.14 
— RESOLUTION 16.12 
— SETCOL 16.13 
— SHADING 17.15 
— STPLOT 17.16 
— UPDATE 16.14 
— VIEW 16.15 
I/O Port 18.4 
IF...THEN 8.2 
IMAGE 14.1 
Immediate Mode 2.6, 4.1 
Initialization 4.1 
INP function 18.4 
INPUT 7.1,12.4 
INPUT LINE 12.4, 7.2 
INSTR 9.9 
Instructions 3.9 
— END 4.3 
— GRAPH 2.5 
— LET 3.5 
— PLOT 2.5 
— PRINT 2.2 
— STOP 4.3 
— TEXT 2.6 
INT 9.2 
Internal Format 4.5 
Interrupting a program 2.8 
Interruption of program 10.1 
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— 4807, Special function 1.3, 2.5 
— ALT MODE 1.3 
— BREAK 1.3 
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— CTRL 1.3 
— CTRL/U 2.5 
— DELT 1.3, 2.5, 5.1 
— ESC 1.3 
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— REPT 1.3 
— RETURN 2.4, 1.3, 2.1, 4.1 
— SHIFT 1.3 
— SHIFT DELT 1.3 
— US 1.3 
Keyboard 

— 380Z 1.2 
— 4807, L2 
— Input 12.5 
— Interrupt 8.8 
KILL 10.3 
Leaving BASIC 2.10 
LEFT$ 9.8 
LEN 9.8 
LET 6.3, 3.5 
LINE 11.4 
Line Length 3.7 
Line Numbers 2.6, 4.1 
-“.” form 4.2 
— Error Line number 8.8 
— Order 3.8 
— Renumbering 4.9 
LINE routine 16.9 
LIST 2.7, 4.1, 4.2, 12.7, 15.2 
LIST. 4.2 
Listing Disc Files 4.4 
Literal Strings 3.2 
LLVAR 10.2 
LNULL 7.5 
LOAD? 4.6 
LOADGO 4.6 
Loading Programs 2.10, 4.5 
LOCAL PRINTER 4.8 
Local Variables 9.14 
LOCK 13.11 
Locking a file 13.11 
LOG 9.2 
Logical Operators 

— AND 3.6 
— NOT 3.6 
— OR 3.6 
— XOR 3.7 
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LOOKUP 12.3 
LPOS 7.5 
LPRINT 7.4 
LTRACE 10.3 
LVAR 10.2, 12.7 
LWIDTH 7.5 
Machine Language 18.1 
Machine-language routines 

— Adding and saving 18.10 
Matrix 3.3 
MAX 9.4 
Memory 3.1 
— 380Z & 4807; layout 18.2 
— Access 18.4 
— Buffer space 13.1 
— Cache 16.7, 16.8, 18.3, 18.4 
— Cache size 6.2 
— Cache Size 13.1, 18.3 
— Clearing memory 2.6 
— Clearing Program Area 4.8 
— Data Memory 16.7, 16.8 
— Deleting programs 2.10 
— Determining available mem. 6.1 
— Determining string space 6.1 
— ENDMEM location 18.3 
— Garbage Collector 3.4 
— Graphics Memory 16.7, 16.8 
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— ПО Ports 18.4 
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— Reading Contents 18.4 
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— Requirements for strings 3.4 
— Saving Graphics memory 16.8 
— Setting contents 18.4 
— Stack 3.5, 8.5, 18.8 
— Storage 18.4 
— String Space 3.5 
— String space 3.4 
— VDU 15.2 
MERGE 4.7 
MERGEGO 4.7 
MID$ 9.8 
MIN 9.5 
MOD 9.5 
Mode 

— Direct 2.6, 4.1 
— Immediate 2.6, 4.1 
— Program 2.6, 4.1 
Moving the Cursor 2.5 
Multiline Functions 9.13 
— Further notes 9.18 
— General definition 9.17 
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— Changing a disc 

— Closing files 

— Disc Units 

— Output 

— Printer 

— Server files 

— Terminating Output 
NETWORK PRINTER 
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NEW 

NOT 

NULL 

Null String 

Numbers 

— Binary Floating-Point 
— Decimal 

— Decimal Point 

— Exponential Notation 
— Format Specification 
— Fractional Part 

— Hexadecimal 

— Hexadecimal Conversion 
— Integer Part 

— Internal Representation 
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— Numeric array 

— Numeric functions 

— Numeric variables 
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— Precision 

— Range 

— Representation 

— Rounding 

— Rounding Errors 

— Significant Figures 

— Truncation 
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OFFSET 

ON BREAK 
ON EOF 

ON ERROR 
ON...GOSUB 
ON...GOTO 
PEN 
Operands 

— Bracketted Expression 
— Constant 

— Function Call 

— Variable 
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Operators 
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— Exponentiation 
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— MOD 
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— XOR 

OR 

OUT 

OUTM routine 

Output buffer 

Output to printer 


PATSIZE 

PEEK 

Pixel (see Graphics) 
PLOT 

PLOT routine 
POINT 

Pointer (Stack) 
POINTS 

POKE 

Portable Program 
POS 

PRINT 

Print 

— Printhead position 
Print List 

PRINT USING 
PRINTER command 
Printer 

— Anadex 

— Epson 

— Hard-Copy 

— Incorrect Setting 
— Option 

— Output 
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Procedures 

— Examples 

— Further notes 
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— User-defined 
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PROCRETURN 
Program 

— Addition game 
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— Debugging 
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— Interruption 
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— Running 

— Saving on Disc 
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— DDT 

— SAVE 
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— Ready: 
Pseudo-random numbers 
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RANDOM 13.4 
Random Access Files 12.1, 13.2 
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RDOUT 17.14 
Re-dimensioned Array 6.2 
READ 6.4, 13.6 
Ready: prompt 2.1, 4.1, 4.6 
Record Length 13.3 
Recursion 9.16, 9.20 
Recursive Functions 9.16 
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Relational Operators 3.6, 8.2 
RELEASE 4.10, 12.3 
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RENAME 4.9, 4.1, 12.2 
Renaming a File 4.8 
RENUMBER 4.9 
REPT 1.3 
RESET 4.10, 12.3 
RESET Button 2.1 
RESOLUTION 16.12, 15.2 
Restarting a program 2.8 
RESTORE 6.4 
RESUME 8.6 
RET 18.9 
RETURN 1.3, 4.1 
— Use in Line Deletion 3.8 
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Reverse Video 11.3 
Reversed Image 16.4 
RIGHT$ 9.8 
RLEN 13.14 
RND 9.3, 10.3 
Rounding 3.9 
RPOS 13.14 
Rubout Code 1.3 
RUN 2.7, 4.10, 4.1, 9.19, 9.22 
Running a program 4.1,4.1 
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SAVE 4.11 
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Swapping values of variables 
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USR 18.7, 18.1, 18.6 
Utility Commands 
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— Determining Address 18.6 
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WRITE 13.9 
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USER’S COMMENTS 


To help Research Machines to produce the highest 
quality microcomputers, supporting software, and 
technical publications, we like to hear from users about 
their experiences with our products. 


Do share your thoughts with us by jotting them down 
on the tear-off form on the next page. You can leave out 
your personal details, if you want to. Fold the form in 
two, seal it with a piece of adhesive tape, and put it in the 
post. No stamp is needed if you post it within the United 
Kingdom. 


If you would like to give more information than we have 
allowed room for on the form, we will be very pleased to 
receive a separate letter from you. You can even use the 
form to ask for a post-paid envelope, if you wish. 


Additional information will be most useful, if you give 
us as much detail as possible about your hardware 
configuration, software version number, or manual title, 
so that we can relate your comments to the correct 
products. 
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